X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=contrib%2Fsb-introspect%2Ftest.lisp;h=682074a0078264aded3ad8890308ab9cc3ebc96e;hb=37bf7dd7201a3b8c8db4b07b32934f6c5d3b6fdd;hp=cd100c542fd09a6b1c5cd77e7b48ed0677f40358;hpb=9b69e80c82ef126a8f9c120113d4e75b17845f13;p=sbcl.git

diff --git a/contrib/sb-introspect/test.lisp b/contrib/sb-introspect/test.lisp
index cd100c5..682074a 100644
--- a/contrib/sb-introspect/test.lisp
+++ b/contrib/sb-introspect/test.lisp
@@ -74,3 +74,5 @@
 (eval-when (:compile-toplevel)
   (defun compile-time-too-fun ()
     :foo))
+
+(sb-ext:defglobal **global** 'value)