fixed procedure? crash in tests/regex.scm