Parent Directory | Revision Log | Patch
revision 1.10 by pfdietz, Sat Dec 14 04:54:00 2002 UTC | revision 1.11 by pfdietz, Mon Jan 13 00:16:56 2003 UTC | |
---|---|---|
# | Line 316 | Line 316 |
316 | (defparameter type-and-class-macros | (defparameter type-and-class-macros |
317 | (not (macro-function 'deftype)) | (not (macro-function 'deftype)) |
318 | nil) | nil) |
319 | ||
320 | ;;; Special cases of types-6 that are/were causing problems in CMU CL | |
321 | ||
322 | (deftest keyword-is-subtype-of-atom | |
323 | (subtypep* 'keyword 'atom) | |
324 | t t) | |
325 | ||
326 | (deftest ratio-is-subtype-of-atom | |
327 | (subtypep* 'ratio 'atom) | |
328 | t t) | |
329 | ||
330 | (deftest extended-char-is-subtype-of-atom | |
331 | (subtypep* 'extended-char 'atom) | |
332 | t t) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |