2
0
Эх сурвалжийг харах

Prefix runtime procedures

gingerBill 7 жил өмнө
parent
commit
1a4e25f141
1 өөрчлөгдсөн 12 нэмэгдсэн , 12 устгасан
  1. 12 12
      core/runtime/internal.odin

+ 12 - 12
core/runtime/internal.odin

@@ -364,20 +364,20 @@ make_map_expr_error_loc :: inline proc "contextless" (using loc := #caller_locat
 
 @(default_calling_convention = "c")
 foreign {
-	@(link_name="llvm.sqrt.f32") sqrt_f32 :: proc(x: f32) -> f32 ---
-	@(link_name="llvm.sqrt.f64") sqrt_f64 :: proc(x: f64) -> f64 ---
+	@(link_name="llvm.sqrt.f32") _sqrt_f32 :: proc(x: f32) -> f32 ---
+	@(link_name="llvm.sqrt.f64") _sqrt_f64 :: proc(x: f64) -> f64 ---
 
-	@(link_name="llvm.sin.f32") sin_f32  :: proc(θ: f32) -> f32 ---
-	@(link_name="llvm.sin.f64") sin_f64  :: proc(θ: f64) -> f64 ---
+	@(link_name="llvm.sin.f32") _sin_f32  :: proc(θ: f32) -> f32 ---
+	@(link_name="llvm.sin.f64") _sin_f64  :: proc(θ: f64) -> f64 ---
 
-	@(link_name="llvm.cos.f32") cos_f32  :: proc(θ: f32) -> f32 ---
-	@(link_name="llvm.cos.f64") cos_f64  :: proc(θ: f64) -> f64 ---
+	@(link_name="llvm.cos.f32") _cos_f32  :: proc(θ: f32) -> f32 ---
+	@(link_name="llvm.cos.f64") _cos_f64  :: proc(θ: f64) -> f64 ---
 
-	@(link_name="llvm.pow.f32") pow_f32  :: proc(x, power: f32) -> f32 ---
-	@(link_name="llvm.pow.f64") pow_f64  :: proc(x, power: f64) -> f64 ---
+	@(link_name="llvm.pow.f32") _pow_f32  :: proc(x, power: f32) -> f32 ---
+	@(link_name="llvm.pow.f64") _pow_f64  :: proc(x, power: f64) -> f64 ---
 
-	@(link_name="llvm.fmuladd.f32") fmuladd32  :: proc(a, b, c: f32) -> f32 ---
-	@(link_name="llvm.fmuladd.f64") fmuladd64  :: proc(a, b, c: f64) -> f64 ---
+	@(link_name="llvm.fmuladd.f32") _fmuladd32  :: proc(a, b, c: f32) -> f32 ---
+	@(link_name="llvm.fmuladd.f64") _fmuladd64  :: proc(a, b, c: f64) -> f64 ---
 }
 abs_f32 :: inline proc "contextless" (x: f32) -> f32 {
 	foreign {
@@ -419,11 +419,11 @@ max_f64 :: proc(a, b: f64) -> f64 {
 
 abs_complex64 :: inline proc "contextless" (x: complex64) -> f32 {
 	r, i := real(x), imag(x);
-	return sqrt_f32(r*r + i*i);
+	return _sqrt_f32(r*r + i*i);
 }
 abs_complex128 :: inline proc "contextless" (x: complex128) -> f64 {
 	r, i := real(x), imag(x);
-	return sqrt_f64(r*r + i*i);
+	return _sqrt_f64(r*r + i*i);
 }