Index: /trunk/ccl/compiler/vinsn.lisp
===================================================================
--- /trunk/ccl/compiler/vinsn.lisp	(revision 367)
+++ /trunk/ccl/compiler/vinsn.lisp	(revision 368)
@@ -573,5 +573,5 @@
       (ecase class
         (:crf (make-wired-lreg (use-crf-temp value) :class hard-reg-class-crf))
-        ((:u8 :s8 :u16 :s16 :u32 :s32) 
+        ((:u8 :s8 :u16 :s16 :u32 :s32 :u64 :s64) 
          (make-wired-lreg (use-imm-temp value)
 			  :class hard-reg-class-gpr
@@ -587,5 +587,5 @@
               :class hard-reg-class-gpr
               :mode hard-reg-class-gpr-mode-node)) 
-        ((:u8 :s8 :u16 :s16 :u32 :s32) 
+        ((:u8 :s8 :u16 :s16 :u32 :s32 :u64 :s64) 
          (make-unwired-lreg (select-imm-temp)
 			    :class hard-reg-class-gpr