Changeset 27340 in project
- Timestamp:
- 08/30/12 13:18:07 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
release/4/numbers/trunk/tests/string-conversion.scm
r26250 r27340 74 74 (newline))))))))))))) 75 75 76 ;; Here comes a horrible nasty hack. It seems to work though ;)77 76 (define-syntax test-numbers 78 77 (syntax-rules (compnums fractions) … … 113 112 ("#I1" 1.0 "1.0" "1.") 114 113 ("#i-1" (- 1.0) "-1.0" "-1.") 114 ("123\x00456" #f) 115 115 ("-#i1" #f) 116 116 ("+-1" #f) … … 236 236 ("1/2e2" #f) 237 237 ("1#/2" 5.0 7.5 "5.0" "5." "7.5") 238 ("1/2#" 0.05 "0.05" ".05" "50.0e-3" )238 ("1/2#" 0.05 "0.05" ".05" "50.0e-3" "5.e-002") 239 239 ("1#/#" #f) 240 240 ("1/" #f)
Note: See TracChangeset
for help on using the changeset viewer.