-;; 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)
(define-setf-expander s (a b)
(format t "~a ~a~%" a b))
+(eval-when (:compile-toplevel)
+ (defun compile-time-too-fun ()
+ :foo))
+
+(sb-ext:defglobal **global** 'value)