Fixed bug in the definition of re-nonl and credited the guy that reported it.

-Olin
This commit is contained in:
shivers 1999-10-04 17:29:44 +00:00
parent 86300b9693
commit 232ab91be9
2 changed files with 5 additions and 1 deletions

View File

@ -261,6 +261,7 @@ particularly in the task of porting scsh to new platforms.
Jarmo Hurri
Lars Kellogg-Stedman
Andre Koehoerst
Hannu Koivisto
Shriram Krishnamurthi
Jakob Lichtenberg
Eric Marsden

View File

@ -392,7 +392,10 @@
(and (char-set? cs) ; Might be code...
(char-set-full? cs)))))
(define re-nonl (make-re-char-set/posix (char-set #\newline) "[^\n]" '#()))
(define re-nonl
(make-re-char-set/posix (char-set-invert (char-set #\newline))
"[^\n]"
'#()))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;