$ cat m.scm (use matchable) (match 'some-form ((or ('define-syntax identifier (syntax-rules ...)) ('define-syntax identifier (er-macro-transformer ...))) 'a-macro) (else #f)) $ csc m.scm $ echo $? 0 $ cat m2.scm (module bug () (import chicken scheme) (use matchable) (match 'some-form ((or ('define-syntax identifier (syntax-rules ...)) ('define-syntax identifier (er-macro-transformer ...))) 'a-macro) (else #f)) ) $ csc m2.scm Warning: reference to possibly unbound identifier `syntax-rules' in: Warning: fk21019 Warning: suggesting one of: Warning: (import r5rs-null) Warning: (import r4rs-null) Warning: (import scheme) Warning: (import r4rs) Error: module unresolved: bug Error: shell command terminated with non-zero exit status 256: '/home/mario/local/chicken-gc-optm/bin/chicken' 'm2.scm' -output-file 'm2.c'