projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
nuke the age-old experimental-thread.patch
[sbcl.git]
/
contrib
/
sb-introspect
/
test.lisp
diff --git
a/contrib/sb-introspect/test.lisp
b/contrib/sb-introspect/test.lisp
index
1b66b2b
..
cd100c5
100644
(file)
--- a/
contrib/sb-introspect/test.lisp
+++ b/
contrib/sb-introspect/test.lisp
@@
-1,4
+1,10
@@
-;; Do not alter this file unless you edit test-driver.lisp to match
+
+;;;
+;;; The order of the forms must not change, as the order is checked in
+;;; `test-driver.lisp'. Thus do not alter this file unless you edit
+;;; test-driver.lisp to match.
+;;;
+
(declaim (optimize (debug 3)))
(in-package :cl-user)
(declaim (optimize (debug 3)))
(in-package :cl-user)
@@
-65,3
+71,6
@@
(define-setf-expander s (a b)
(format t "~a ~a~%" a b))
(define-setf-expander s (a b)
(format t "~a ~a~%" a b))
+(eval-when (:compile-toplevel)
+ (defun compile-time-too-fun ()
+ :foo))