Changeset 368

Timestamp:

Jan 24, 2004, 3:22:46 PM (21 years ago)

Author:

Gary Byers

Message:

Match against :u64/:s64 storage class names.

File:

• trunk/ccl/compiler/vinsn.lisp (modified) (2 diffs)

trunk/ccl/compiler/vinsn.lisp

@@ -573 +573 @@
       (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 +587 @@
               :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