Changeset 8841


Ignore:
Timestamp:
Mar 21, 2008, 8:03:06 AM (11 years ago)
Author:
rme
Message:

x862-%immediate-store: changes for 32-bit target.

(It's amazing that things got as far along as they did...)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/ia32/compiler/X86/x862.lisp

    r8834 r8841  
    45904590                     (! gets64)
    45914591                     (! getu64))
    4592                    (! fixnum->signed-natural *x862-imm0* *x862-arg-z*))))
     4592                   (if (and (eq size 4)
     4593                            (target-arch-case
     4594                             (:x8632 t)
     4595                             (:x8664 nil)))
     4596                     (if signed
     4597                       (! gets32)
     4598                       (! getu32))
     4599                     (! fixnum->signed-natural *x862-imm0* *x862-arg-z*)))))
    45934600
    45944601          (and offval (%i> (integer-length offval) 31) (setq offval nil))
Note: See TracChangeset for help on using the changeset viewer.