Welcome to the CHICKEN Scheme pasting service

segfault with -:s added by mario-goulart on Wed Jul 10 21:41:28 2013

$ cat test.scm
(use regex)
(define foo (regexp "(\\./)?tests(/.*)?"))
(define bar (regexp "[^?]+\\?(.+)"))

$ csc test.scm

$ ./test
# ok, no crash

$ ./test -:s10m
# segfault

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Which one-argument R5RS procedure returns 3 when given `'(1 2 3 4)' as input?