Parent Directory | Revision Log | Patch
revision 1.5 by pfdietz, Thu Oct 17 13:16:56 2002 UTC | revision 1.6 by pfdietz, Tue Oct 22 05:36:32 2002 UTC | |
---|---|---|
# | Line 377 | Line 377 |
377 | ||
378 | ;; This should be greatly expanded | ;; This should be greatly expanded |
379 | ||
380 | ||
381 | (defparameter *type-and-class-fns* | |
382 | '(coerce subtypep type-of typep type-error-datum type-error-expected-type)) | |
383 | ||
384 | (deftest type-and-class-fns | |
385 | (remove-if #'fboundp *type-and-class-fns*) | |
386 | nil) | |
387 | ||
388 | (defparameter type-and-class-macros | |
389 | (not (macro-function 'deftype)) | |
390 | nil) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |