diff options
| author | Edwin Groothuis <edwin@FreeBSD.org> | 2003-09-28 09:49:33 +0000 |
|---|---|---|
| committer | Edwin Groothuis <edwin@FreeBSD.org> | 2003-09-28 09:49:33 +0000 |
| commit | a5432df574dd1eb5cfacd49250cf8aa7d296c916 (patch) | |
| tree | 3da7df0c5b720f97981d126002336cff5b3a2934 /textproc/cl-ppcre/files/patch-util.lisp | |
| parent | New Port: Common Lisp portability package (diff) | |
New Port: Portable Perl-Compatible Regexps for Common Lisp
cl-ppcre is a pure ANSI Common Lisp implementation of
Perl-compatible regular expressions.
This port depends on the previously submitted ASDF port.
It installs the sources and the .asd file. There are other
ports for binaries for the supported Lisp implementations.
PR: ports/52369
Submitted by: Henrik Motakef <henrik.motakef@web.de>
Diffstat (limited to 'textproc/cl-ppcre/files/patch-util.lisp')
| -rw-r--r-- | textproc/cl-ppcre/files/patch-util.lisp | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/textproc/cl-ppcre/files/patch-util.lisp b/textproc/cl-ppcre/files/patch-util.lisp new file mode 100644 index 000000000000..abc7bb843b6b --- /dev/null +++ b/textproc/cl-ppcre/files/patch-util.lisp @@ -0,0 +1,17 @@ +--- util.lisp.orig Fri May 16 23:16:22 2003 ++++ util.lisp Fri May 16 23:16:42 2003 +@@ -155,10 +155,10 @@ + (loop with min1 and min2 and min3 + and max1 and max2 and max3 + ;; loop through all characters in HASH, sorted by CHAR< +- for chr in (sort (loop for chr being the hash-keys of hash +- collect (if downcasep +- (char-downcase chr) +- chr)) ++ for chr in (sort (the list (loop for chr being the hash-keys of hash ++ collect (if downcasep ++ (char-downcase chr) ++ chr))) + #'char<) + for code = (char-code chr) + ;; MIN1, MAX1, etc. are _exclusive_ |