Commit 73b18319 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau

Fix define-package on MKCL in some upgrade case (thanks to JCB).

parent 1cec1baf
......@@ -734,7 +734,7 @@ UNINTERN -- Remove symbols here from PACKAGE."
(let ((ensure-form
`(apply 'ensure-package ',(parse-define-package-form package clauses))))
`(progn
#+(or ecl gcl) (defpackage ,package (:use))
#+(or ecl gcl mkcl) (defpackage ,package (:use))
(eval-when (:compile-toplevel :load-toplevel :execute)
,ensure-form))))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment