Commit fdd5c3d0 authored by pfdietz's avatar pfdietz
Browse files

Added some error tests for ensure-generic-function.

parent 29685269
......@@ -56,5 +56,22 @@
nil t t t)
;;; Many more tests are needed for other combinations of keyword parameters
(deftest ensure-generic-function.error.1
(classify-error (ensure-generic-function))
(deftest ensure-generic-function.error.2
(classify-error (ensure-generic-function (gensym) :lambda-list))
(deftest ensure-generic-function.error.3
(classify-error (ensure-generic-function (gensym) :allow-other-keys t
'("not a valid keyword") nil))
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