removed leftovers
svn: r10770
This commit is contained in:
parent
824fba5b26
commit
a0d4bc8393
|
@ -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)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user