This should fix a small bug in libc regex where a case-insensitivity
request i.e. (regexp "....." #t) would be ignored.
--- chicken-1.935/regex.scm.orig 2005-05-30 15:39:20.000000000 -0500
+++ chicken-1.935/regex.scm 2005-05-30 15:39:38.000000000 -0500
@@ -268,7 +268,7 @@
"C_free(rx);") ]
[%comp
(foreign-lambda* int ([c-string rx] [c-pointer ptr] [unsigned-integer
flags])
- "return(regcomp((regex_t *)ptr, rx, REG_EXTENDED));") ] )
+ "return(regcomp((regex_t *)ptr, rx, flags));") ] )
(let ([comp
(lambda (rx rt ls)
(if (null? ls)
_______________________________________________
Chicken-users mailing list
[email protected]
http://lists.nongnu.org/mailman/listinfo/chicken-users
