Ignore:
Timestamp:
Oct 3, 2008, 9:26:07 PM (12 years ago)
Author:
gb
Message:

Replace uses of target::nil-value with (CCL::TARGET-NIL-VALUE) and
target::t-value with (CCL::TARGET-T-VALUE).

This was very slightly hard to bootstrap (the new backend-lowmem-bias
had to be in effect and typically 0), so I'll start checking in images
in a minute.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/compiler/X86/x86-lapmacros.lisp

    r10203 r10959  
    193193  (target-arch-case
    194194   (:x8632
    195     `(cmpl ($ x8632::nil-value) (%l ,reg)))
    196    (:x8664
    197     `(cmpb ($ (logand #xff x8664::nil-value)) (%b ,reg)))))
     195    `(cmpl ($ (target-nil-value)) (%l ,reg)))
     196   (:x8664
     197    `(cmpb ($ (logand #xff (target-nil-value))) (%b ,reg)))))
    198198
    199199(defx86lapmacro unbox-fixnum (src dest)
     
    331331  (target-arch-case
    332332   (:x8632
    333     `(movl (@ (+ x8632::nil-value ,(x8632::%kernel-global global))) (% ,reg)))
    334    (:x8664
    335     `(movq (@ (+ x8664::nil-value ,(x8664::%kernel-global global))) (% ,reg)))))
     333    `(movl (@ (+ (target-nil-value) ,(x8632::%kernel-global global))) (% ,reg)))
     334   (:x8664
     335    `(movq (@ (+ (target-nil-value) ,(x8664::%kernel-global global))) (% ,reg)))))
    336336
    337337(defx86lapmacro ref-global.l (global reg)
    338338  (target-arch-case
    339339   (:x8632
    340     `(movl (@ (+ x8632::nil-value ,(x8632::%kernel-global global))) (%l ,reg)))
    341    (:x8664
    342     `(movl (@ (+ x8664::nil-value ,(x8664::%kernel-global global))) (%l ,reg)))))
     340    `(movl (@ (+ (target-nil-value) ,(x8632::%kernel-global global))) (%l ,reg)))
     341   (:x8664
     342    `(movl (@ (+ (target-nil-value) ,(x8664::%kernel-global global))) (%l ,reg)))))
    343343
    344344(defx86lapmacro set-global (reg global)
    345345  (target-arch-case
    346346   (:x8632
    347     `(movl (% ,reg) (@ (+ x8632::nil-value ,(x8632::%kernel-global global)))))
    348    (:x8664
    349     `(movq (% ,reg) (@ (+ x8664::nil-value ,(x8664::%kernel-global global)))))))
     347    `(movl (% ,reg) (@ (+ (target-nil-value) ,(x8632::%kernel-global global)))))
     348   (:x8664
     349    `(movq (% ,reg) (@ (+ (target-nil-value) ,(x8664::%kernel-global global)))))))
    350350
    351351(defx86lapmacro macptr-ptr (src dest)
Note: See TracChangeset for help on using the changeset viewer.