Changeset 369

Timestamp:

Jan 24, 2004, 3:23:40 PM (21 years ago)

Author:

Gary Byers

Message:

Yawn. Update spec class alist for new storage-class names.

File:

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

trunk/ccl/compiler/vreg.lisp

@@ -190 +190 @@
     (:u32 . ,arch::storage-class-u32)
     (:s32 . ,arch::storage-class-s32)
+    (:u64 . ,arch::storage-class-u64)
+    (:s64 . ,arch::storage-class-s64)
     (:address . ,arch::storage-class-address)
     (:single-float . ,arch::storage-class-single-float)
@@ -197 +199 @@
     (:crf . ,arch::storage-class-crf)
     (:crbit . ,arch::storage-class-crbit)
-    (:crfbit . ,arch::storage-class-crfbit)
+    (:crfbit . ,arch::storage-class-crfbit)   
     (t . nil)))