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
parent
ed5c68bcbe
commit
c872a37fe2
|
@ -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)))
|
||||
|
|
|
@ -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)
|
||||
|
|
Loading…
Reference in New Issue