ambrevar/syntax: Rename readtable to "syntax" to avoid clashes with default readtable.

Indeed, if multiple named readtables are called "readtable" (even with a package
prefix), the last one to be defined seems to override the currently loaded 'readtable'.
master
Pierre Neidhardt 2021-02-19 11:10:53 +01:00
parent ed5c68bcbe
commit c872a37fe2
2 changed files with 3 additions and 3 deletions

View File

@ -81,7 +81,7 @@ GUIX-COMMAND is the command to the guix executable, e.g. '(\"~/projects/guix/pre
;; packages remain loadable?
`((sbcl-ambrevar ("lisp-repl-core-dumper" "-p" "ambrevar sb-sprof" "sbcl"
"--eval" "(in-package :ambrevar/all)"
"--eval" "(named-readtables:in-readtable ambrevar/syntax:readtable)"))
"--eval" "(named-readtables:in-readtable ambrevar/syntax:syntax)"))
(sbcl (,@maybe-core-dumper "sbcl"))
(sbcl-failsafe ("sbcl"))
(sbcl-nyxt (lambda () (ambrevar/sbcl-for-nyxt :no-grafts? t)))

View File

@ -45,8 +45,8 @@
(read-until stream #\")
(ambrevar/file:file (read-until stream #\")))
(export-always 'readtable)
(named-readtables:defreadtable readtable
(export-always 'syntax)
(named-readtables:defreadtable ambrevar/syntax::syntax
(:merge :standard)
(:dispatch-macro-char #\# #\# #'sh-reader)
(:dispatch-macro-char #\# #\$ #'$cmd-reader)