removed leftovers

svn: r10770
This commit is contained in:
Eli Barzilay 2008-07-14 15:37:56 +00:00
parent 824fba5b26
commit a0d4bc8393

View File

@ -45,20 +45,8 @@
[".1" #f] [".1" #f]
["1." #f] ["1." #f]
["foo" #f] ["foo" #f]
["x.y" #f]
["0" #f] ["0" #f]
)) ))
;"planet-shared.ss"> (string->mz-version "1.2.3.4.5")
;#(struct:mz-version 102 3004) SHOULD BE #f
;"planet-shared.ss"> (string->mz-version "1...2")
;#f
;"planet-shared.ss"> (string->mz-version ".2")
;#f
;"planet-shared.ss"> (string->mz-version "2.")
;#f
;"planet-shared.ss"> (string->mz-version "foo")
;#f
;"planet-shared.ss"> (string->mz-version "x.y")
;#f
(report-errs) (report-errs)