projects
/
mit-scheme.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
fa7e40e
)
Provide definitions for M_LN2 and M_SQRT1_2 if they aren't otherwise defined.
author
Chris Hanson
<org/chris-hanson/cph>
Sun, 26 Jun 2011 09:20:02 +0000
(
02:20
-0700)
committer
Chris Hanson
<org/chris-hanson/cph>
Sun, 26 Jun 2011 09:20:02 +0000
(
02:20
-0700)
src/microcode/flonum.c
patch
|
blob
|
history
diff --git
a/src/microcode/flonum.c
b/src/microcode/flonum.c
index f2c5033e452ef146dae2c4fd30ea6bca4ee6cf78..1d50db4197309116b24508e340ba4727abf4768e 100644
(file)
--- a/
src/microcode/flonum.c
+++ b/
src/microcode/flonum.c
@@
-30,6
+30,14
@@
USA.
#include "prims.h"
#include <errno.h>
+#ifndef M_LN2
+# define M_LN2 0.693147180559945309417232121458176568 /* log e2 */
+#endif
+
+#ifndef M_SQRT1_2
+# define M_SQRT1_2 0.707106781186547524400844362104849039 /* 1/sqrt(2) */
+#endif
+
double
arg_flonum (int arg_number)
{