Index: /trunk/ccl/lib/nfcomp.lisp
===================================================================
--- /trunk/ccl/lib/nfcomp.lisp	(revision 845)
+++ /trunk/ccl/lib/nfcomp.lisp	(revision 846)
@@ -971,5 +971,6 @@
 
 (defparameter *istruct-make-load-form-types*
-  '(lexical-environment shared-library-descriptor shared-library-entry-point external-entry-point
+  '(lexical-environment shared-library-descriptor shared-library-entry-point
+    external-entry-point foreign-variable
     ctype unknown-ctype class-ctype foreign-ctype union-ctype member-ctype 
     array-ctype numeric-ctype hairy-ctype named-ctype constant-ctype args-ctype