svn: r9198

This commit is contained in:
Eli Barzilay 2008-04-08 12:39:36 +00:00
parent 26b283b953
commit 5cde854a07

View File

@ -10,7 +10,8 @@
(test "1" real->decimal-string 0.6 0) (test "1" real->decimal-string 0.6 0)
(test "1" real->decimal-string 3/4 0) (test "1" real->decimal-string 3/4 0)
(test "1" real->decimal-string 1.2 0) (test "1" real->decimal-string 1.2 0)
(test "0" real->decimal-string -0.0 0) ; ! (test "0" real->decimal-string -0.0 0) ; note this!
(test "0.00" real->decimal-string -0.0) ; same here...
(test "-1" real->decimal-string -0.6 0) (test "-1" real->decimal-string -0.6 0)
(test "-1" real->decimal-string -3/4 0) (test "-1" real->decimal-string -3/4 0)
(test "-1" real->decimal-string -1.2 0) (test "-1" real->decimal-string -1.2 0)