Control: tags -1 + patch

Patch to fix this (by treating radix value 1 as invalid) attached.
You need to rerun "make image" for it to take effect.

Note that according to the specification of number->string in
r[567]rs, the only acceptable radix values are 2, 8, 10, and 16.

(But other scheme implementations are also more tolerant, e.g. Guile
allows 2..36)


--- a/scheme/rts/numio.scm
+++ b/scheme/rts/numio.scm
@@ -17,7 +17,7 @@
                 (and (null? (cdr maybe-radix))
                      (integer? radix)
                      (exact? radix)
-                     (< 0 radix))))
+                     (<= 2 radix))))
        (real-number->string number radix)
        (apply assertion-violation
               'number->string

Reply via email to