Plaster

(let ((pkg (make-package "" :use nil))) (export (intern "SYMBOL" pkg) pkg) (package-name (symbol-package (read-from-string "||:symbol")))) ; SBCL, CMUCL, CCL => "" ; ECL, CLASP, CLISP, MKCL, Corman Lisp, LispWorks, JSCL => "KEYWORD" ; ACL >> A package named "" already exists ; ABCL >> java.lang.IndexOutOfBoundsException: fromIndex: 1 > toIndex: 0 (let ((*package* (make-package "" :use nil))) (package-name (symbol-package (read-from-string "symbol")))) ; SBCL, CMUCL, CCL, ECL, ABCL, CLISP, MKCL, Corman Lisp, LispWorks, JSCL => "" ; CLASP => NIL ; ACL >> A package named "" already exists ;; Versions: ; sbcl 2.4.6 ; cmucl 21e ; ccl 1.12 ; AllegroCL 11.0 ; ecl 23.9.9 ; clasp 2.5.0 ; abcl 1.9.2 ; clisp 2.49.93+ ; mkcl 1.1.11 ; Corman Lisp 3.1 ; LispWorks 8.0.1