Commit b3ed98a9 authored by pfdietz's avatar pfdietz

Fixed type (thanks piso).

parent 1b3ffe22
......@@ -34,11 +34,11 @@
(slot-unbound-class-01 b))
(defmethod slot-unbound ((class t) (obj slot-unbound-class-01)
(slot-nake (eql 'e)))
(slot-name (eql 'e)))
(values))
(defmethod slot-unbound ((class t) (obj slot-unbound-class-01)
(slot-nake (eql 'f)))
(slot-name (eql 'f)))
(values 1 2 3))
(deftest slot-unbound.3
......
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