Forgot to define this. Ummm, I guess cref accidentally made it work?

diff --git a/src/runtime/arith.scm b/src/runtime/arith.scm
index ee2d0471f91f2bbaf5cc8ea74ed830f16a6235e1..087b593c7bdd09e16e6b9497eb95ab0c92cde47c 100644 (file)
--- a/src/runtime/arith.scm
+++ b/src/runtime/arith.scm
@@ -93,6 +93,7 @@ USA.
 (define rec:pi/2 (flo:* 2. (flo:atan2 1. 1.)))
 (define rec:pi (flo:* 2. rec:pi/2))
 
+(define flo:radix 2)
 (define flo:epsilon)
 (define flo:log-epsilon)
 (define flo:normal-exponent-max-base-2)