diff options
Diffstat (limited to 'utils.lisp')
| -rw-r--r-- | utils.lisp | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/utils.lisp b/utils.lisp deleted file mode 100644 index d0f61d5..0000000 --- a/utils.lisp +++ /dev/null @@ -1,11 +0,0 @@ -(in-package #:utils) - -(defmacro with-package (pkg-sym &body body) - (let ((pkg-name (symbol-name pkg-sym))) - (unless (find-package pkg-name) - (make-package pkg-name)) - (let ((body-as-string (format nil "(cl:progn ~{~s~&~})" body)) - (body-as-form)) - (let ((*package* (find-package pkg-name))) - (setq body-as-form (read-from-string body-as-string))) - body-as-form))) |