?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
1.0.20.20: fix gencgc on 32 bit platforms with 2gb< heap
[sbcl/pkhuong.git] / tests / bug-417.lisp
blob87e3a37c55163669d4c455f4f2a7553cb51a76de
1 ;;; bug 417: toplevel nil confusing source-path logic
2 nil
3 (defmethod frob ((package package) stream)
4 (if (string= (package-name package) "FOO")
5 (pprint-logical-block (stream nil))
6 (print-unreadable-object (package stream))))
pkhuong's fork