$ ls -l
total 4
-rw-r--r-- 1 mario mario 92 Nov 28 16:43 module.scm
drwxr-xr-x 2 mario mario 72 Nov 28 16:42 tests


$ cat module.scm 
(module module (foo)

(import chicken scheme)

(define (foo) (print 'foo))

) ;; end module


$ cat tests/run.scm 
(load-relative "../module.scm")

(import module)

(foo)


$ cd tests
$ csi -s run.scm 
foo