X-Git-Url: http://git.kpe.io/?p=uffi.git;a=blobdiff_plain;f=src%2Fprimitives.lisp;h=e49c4b422febc328abb830a676a187acf1a7945c;hp=50023b354919a1932ae1e06d07efcd29f4cbe89a;hb=54929de80ac68bb7ef45a28e70945c7243d39c82;hpb=f33f2b331c96549cbdcb7c9ddf30568ceaabe5f9

diff --git a/src/primitives.lisp b/src/primitives.lisp
index 50023b3..e49c4b4 100644
--- a/src/primitives.lisp
+++ b/src/primitives.lisp
@@ -183,7 +183,7 @@ supports takes advantage of this optimization."
       (:array . :array)))
 
 #+(or allegro cormanlisp)
-(push 'uffi:no-long-long cl:*features)
+(push 'uffi:no-long-long cl:*features*)
 
 #+lispworks
 (setq *type-conversion-list*
@@ -208,7 +208,7 @@ supports takes advantage of this optimization."
       (:array . :c-array)))
 
 #+(and lispworks (not lispworks6))
-(push 'uffi:no-long-long cl:*features)
+(push 'uffi:no-long-long cl:*features*)
 
 #+digitool
 (setq *type-conversion-list*
@@ -224,7 +224,7 @@ supports takes advantage of this optimization."
        (:float . :single-float) (:double . :double-float)
        (:array . :array)))
 #+digitool
-(push 'uffi:no-long-long cl:*features)
+(push 'uffi:no-long-long cl:*features*)
 
 #+openmcl
 (setq *type-conversion-list*