diff options
Diffstat (limited to 'module/system/syntax.scm')
-rw-r--r-- | module/system/syntax.scm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/module/system/syntax.scm b/module/system/syntax.scm index 9d6bc571f..34fadb39f 100644 --- a/module/system/syntax.scm +++ b/module/system/syntax.scm @@ -20,7 +20,14 @@ (define-module (system syntax) #:use-module (system syntax internal) - #:re-export (syntax-local-binding + #:re-export (syntax? + syntax-local-binding (%syntax-module . syntax-module) syntax-locally-bound-identifiers syntax-session-id)) + +;; Used by syntax.c. +(define (print-syntax obj port) + ;; FIXME: Use syntax->datum instad of syntax-expression, when + ;; syntax->datum can operate on new syntax objects. + (format port "#<syntax ~s>" (syntax-expression obj))) |