Commit ced88d39 authored by pfdietz's avatar pfdietz

Undid last change.

parent 35ca1ab7
......@@ -111,11 +111,6 @@
(classify-error (allocate-instance))
program-error)
;;; I don't think the following two tests are right.
;;; The function takes a &rest argument, not a &key argument,
;;; so the section on keyword argument checking doesn't apply
#|
(deftest allocate-instance.error.2
(classify-error (allocate-instance (find-class 'allocate-instance-class-01)
:b))
......@@ -125,4 +120,3 @@
(classify-error (allocate-instance (find-class 'allocate-instance-class-01)
'(a b c) nil))
program-error)
|#
\ No newline at end of file
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