Fixed the type of real->decimal-string.

original commit: cdfbbc5476b6c2df62aedc8813ad13bc28cb2619
This commit is contained in:
Vincent St-Amour 2010-07-01 13:41:11 -04:00
parent 98c88bf163
commit 1ebe111f88

View File

@ -165,7 +165,7 @@
(cl->* [->opt [-Input-Port index-type] (Un -Byte (-val eof))])]
;; string.rkt
[real->decimal-string (N [index-type] . ->opt . -String)]
[real->decimal-string (-Real [index-type] . ->opt . -String)]
[random (cl-> [(index-type) -Nat] [() -Real])]