1.0.17.22: respect fill-pointers when trimming strings (regression 1.0.12.23)
[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