diff options
| -rw-r--r-- | cmamut.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/cmamut.lisp b/cmamut.lisp index c8d213f..4f39b05 100644 --- a/cmamut.lisp +++ b/cmamut.lisp @@ -245,10 +245,10 @@ :if-does-not-exist :create) (let ((*print-length* nil) (*print-level* nil)) - (format f "(cl:defpackage ~s)~&" *target-package*) + (format f "(defpackage #~s)~&" *target-package*) (format f "~{~s~&~}" code)))) -(defun run (pkg input output &optional function-filter) +(defun run (input output pkg &optional function-filter) (setf *target-package* pkg) (when (not (find-package *target-package*)) (make-package *target-package*)) |