Commit 0d46fa84 authored by pfdietz's avatar pfdietz

Added special cases of TYPES-6, three cases that are failing in CMU CL.

parent 187c700e
......@@ -316,3 +316,17 @@
(defparameter type-and-class-macros
(not (macro-function 'deftype))
nil)
;;; Special cases of types-6 that are/were causing problems in CMU CL
(deftest keyword-is-subtype-of-atom
(subtypep* 'keyword 'atom)
t t)
(deftest ratio-is-subtype-of-atom
(subtypep* 'ratio 'atom)
t t)
(deftest extended-char-is-subtype-of-atom
(subtypep* 'extended-char 'atom)
t t)
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