Make file usable with LOAD.
authorOlof-Joachim Frahm <olof@macrolet.net>
Sun, 26 Aug 2012 15:23:18 +0000 (17:23 +0200)
committerOlof-Joachim Frahm <olof@macrolet.net>
Sun, 26 Aug 2012 15:23:18 +0000 (17:23 +0200)
glib/gobject.type-info.lisp

index 9d5fa1a..1a7a8e5 100644 (file)
@@ -2,7 +2,7 @@
 
 (defctype g-type gsize)
 
-(eval-when (:load-toplevel :compile-toplevel)
+(eval-when (:compile-toplevel :load-toplevel :execute)
   (defun gtype-make-fundamental-type (x)
     (ash x 2)))