| Paste number 73278: | Python "attempt to dump invalid structure" (package) when in original form but not expanded |
| Pasted by: | S11001001 |
| When: | 5 months, 3 weeks ago |
| Share: | Tweet this! | http://paste.lisp.org/+1KJI |
| Channel: | #lisp |
| Paste contents: |
(in-package #:cl-user)
(eval-when (:compile-toplevel :load-toplevel :execute)
(setf *readtable* (copy-readtable))
(set-dispatch-macro-character
#\# #\L (lambda (stream subchar param)
(declare (ignore subchar param))
(let ((*read-suppress* t))
(read stream t nil t))
(list 'b *package*))))
(defmacro b (pkg)
(declare (ignore pkg))
'(list))
(defun x (&optional (proc #L()))
(funcall proc))
;;echo '(compile-file "sbcl-compile-package")' | sbcl --no-userinit
This paste has no annotations.