suzanne.soy/compatibility
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

typo

Browse Source 
svn: r3128

original commit: 13f4f1e091d7cb3c6b22f49ec2d1e0e3f9f1cf9b
This commit is contained in:
Eli Barzilay 2006-05-30 18:19:23 +00:00
parent 1dc47ab4c3
commit 8ec05db812
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mzlib/string.ss
View File

@ -407,7 +407,7 @@
(define default-glob-case-sens
(not (memq (system-type) '(windows macos macosx))))
(define (glob->regexp glob . case-sens?)
(define glob->regexp
(opt-lambda (glob [case-sens? default-glob-case-sens])
(define len (string-length glob))
(define range #f)