Runtime: add caml_signbit

hhugo · hhugo · commit 1ded1bc121e4 · 2024-11-19T14:45:56.000+01:00
diff --git a/compiler/tests-check-prim/main.output b/compiler/tests-check-prim/main.output
@@ -14,7 +14,6 @@ caml_int64_sub_native
 caml_int64_xor_native
 caml_int_as_pointer
 caml_reset_afl_instrumentation
-caml_signbit
 debugger
 is_digit_normalized
 
diff --git a/compiler/tests-check-prim/main.output5 b/compiler/tests-check-prim/main.output5
@@ -7,7 +7,6 @@ caml_continuation_use
 caml_drop_continuation
 caml_int_as_pointer
 caml_reset_afl_instrumentation
-caml_signbit
 debugger
 is_digit_normalized
 
diff --git a/compiler/tests-check-prim/unix-unix.output b/compiler/tests-check-prim/unix-unix.output
@@ -14,7 +14,6 @@ caml_int64_sub_native
 caml_int64_xor_native
 caml_int_as_pointer
 caml_reset_afl_instrumentation
-caml_signbit
 caml_unix_map_file_bytecode
 debugger
 is_digit_normalized
diff --git a/compiler/tests-check-prim/unix-unix.output5 b/compiler/tests-check-prim/unix-unix.output5
@@ -7,7 +7,6 @@ caml_continuation_use
 caml_drop_continuation
 caml_int_as_pointer
 caml_reset_afl_instrumentation
-caml_signbit
 caml_unix_accept
 caml_unix_access
 caml_unix_alarm
diff --git a/compiler/tests-check-prim/unix-win32.output b/compiler/tests-check-prim/unix-win32.output
@@ -14,7 +14,6 @@ caml_int64_sub_native
 caml_int64_xor_native
 caml_int_as_pointer
 caml_reset_afl_instrumentation
-caml_signbit
 caml_unix_map_file_bytecode
 debugger
 is_digit_normalized
diff --git a/compiler/tests-check-prim/unix-win32.output5 b/compiler/tests-check-prim/unix-win32.output5
@@ -7,7 +7,6 @@ caml_continuation_use
 caml_drop_continuation
 caml_int_as_pointer
 caml_reset_afl_instrumentation
-caml_signbit
 caml_unix_accept
 caml_unix_access
 caml_unix_bind
diff --git a/runtime/js/ieee_754.js b/runtime/js/ieee_754.js
@@ -281,6 +281,7 @@ function caml_copysign_float(x, y) {
 }
 
 //Provides: caml_signbit_float const
+//Alias: caml_signbit
 function caml_signbit_float(x) {
   if (x === 0) x = 1 / x;
   return x < 0 ? 1 : 0;

Original file line number	Diff line number	Diff line change
`@@ -281,6 +281,7 @@ function caml_copysign_float(x, y) {`
`281`	`281`	`}`
`282`	`282`
`283`	`283`	`//Provides: caml_signbit_float const`
	`284`	`+//Alias: caml_signbit`
`284`	`285`	`function caml_signbit_float(x) {`
`285`	`286`	`if (x === 0) x = 1 / x;`
`286`	`287`	`return x < 0 ? 1 : 0;`