Red Hat Linux
Click URL instructions:
Right-click on ad, choose "Copy Link", then paste here →
(This may not be possible with some types of ads)
You seem to have CSS turned off.
Please don't fill out this field.
Briefly describe the problem (required):
Please provide the ad click URL, if possible:
diff --git a/src/code/package.lisp b/src/code/package.lisp
index 2bb677f..b1366d6 100644
@@ -295,10 +295,10 @@ of :INHERITED :EXTERNAL :INTERNAL."
:INHERITED must be supplied."))
,(dolist (symbol symbol-types)
(unless (member symbol '(:internal :external :inherited))
- (error 'program-error
+ (error 'simple-program-error
"~S is not one of :INTERNAL, :EXTERNAL, or :INHERITED."
- :format-argument symbol)))
+ :format-arguments (list symbol))))
(,init-macro ,(car ordered-types))
(flet ((,real-symbol-p (number)
(> number 1)))
On Mon, Sep 29, 2008 at 1:48 PM, Tobias C. Rittweiler <tcr@...> wrote:
Thank you. Merged as 184.108.40.206.
Sign up for the SourceForge newsletter: