Backtrace: In unknown file: ?: 6* [save-module-excursion #] ?: 7 (let (# #) (dynamic-wind # thunk #)) ?: 8 [dynamic-wind # # #] ?: 9* [#] ?: 10* [primitive-load "/usr/share/guile/1.8/ice-9/r5rs.scm"] In /usr/share/guile/1.8/ice-9/r5rs.scm: 20: 11* (define-module (ice-9 r5rs) :export ...) 20: 12 (eval-case (# #) (else #)) In unknown file: ... ?: 13 (let* ((m (process-define-module #))) (set-current-module m) m) ?: 14* [process-define-module (# # # # ...)] ?: 15 (let* (# # # #) (beautify-user-module! module) (# kws # # ...) ...) ?: 16* [loop (#:export (scheme-report-environment) #:re-export ...) () ...] ?: 17 (if (null? kws) (call-with-deferred-observers (lambda () # ...)) ...) ... ?: 18 [dynamic-wind # # #] ?: 19* [#] ?: 20* [module-re-export! # #] ?: 21 (let* ((public-i #)) (for-each (lambda # #) names)) ?: 22 [for-each # #] ?: 23* [# interaction-environment] ?: 24* (let* (#) (cond # # #)) ?: 25 (cond # (# #) (else #)) : In procedure memoization in expression (cond # (# #) ...): : Bad cond clause # in expression (cond # ((eq? var (module-local-variable m name)) (error "re-exporting local variable:" name)) (else (module-add! public-i name var))).