diff options
Diffstat (limited to 'src/guile/skribilo/utils/syntax.scm')
-rw-r--r-- | src/guile/skribilo/utils/syntax.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/guile/skribilo/utils/syntax.scm b/src/guile/skribilo/utils/syntax.scm index b905871..4cb856f 100644 --- a/src/guile/skribilo/utils/syntax.scm +++ b/src/guile/skribilo/utils/syntax.scm @@ -22,7 +22,7 @@ :use-module (system reader library) :use-module (system reader compat) ;; make sure `current-reader' exists :use-module (system reader confinement) - :export (%skribilo-module-reader + :export (%skribilo-module-reader skribilo-module-syntax _ N_) :export-syntax (unwind-protect unless when)) @@ -58,6 +58,10 @@ (list 'reader/record-positions) '()))) +(define-macro (skribilo-module-syntax) + "Install the syntax reader for Skribilo modules." + (fluid-set! current-reader %skribilo-module-reader) + #t) (define-macro (unwind-protect expr1 expr2) |