~ chicken-core (chicken-5) /tests/linking-tests.scm

1;;; Tests linking with core units & extensions ("csc -link ...")
2
3(import (chicken irregex)
4	(reverser))
5
6(unless (irregex-match '(: #\1 (+ any) #\9) (rev "987654321"))
7  (error "weird"))