projects / sbcl.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Fix make-array transforms.
[sbcl.git] / tests / undefined-classoid-bug-1.lisp
1 (in-package "CL-USER")
2
3 (defun a-struct-referencer-1 (struct)
4   (a-struct-slot struct))
5
6 (defun a-class-typep-2 (x)
7   (typep x 'a-class))
Mirror of Steel Bank Common Lisp SBCL's official repository