Changeset 7430


Ignore:
Timestamp:
Oct 12, 2007, 6:24:33 PM (12 years ago)
Author:
rme
Message:

Some easy lap functions updated. Lots more to convert.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/ia32/level-0/X86/X8632/x8632-def.lisp

    r7361 r7430  
    2525(defx86lapfunction %function-code-words ((fun arg_z))
    2626  (trap-unless-typecode= fun x8632::subtag-function)
    27   (xorl (% imm0) (% imm0))
    28   (movw (@ x8632::misc-data-offset (% fun)) (% imm0.w))
     27  (movzwl (@ x8632::misc-data-offset (% fun)) (% imm0))
    2928  (box-fixnum imm0 arg_z)
    3029  (single-value-return))
     
    3231(defx86lapfunction %nth-immediate ((fun arg_y) (n arg_z))
    3332  (trap-unless-typecode= fun x8632::subtag-function)
    34   (xorl (% imm0) (% imm0))
    35   (movw (@ x8632::misc-data-offset (% fun)) (% imm0.w))
     33  (movzwl (@ x8632::misc-data-offset (% fun)) (% imm0))
    3634  (lea (@ (% n) (% imm0) 4) (% imm0))
    3735  (movl (@ x8632::misc-data-offset (% fun) (% imm0)) (% arg_z))
Note: See TracChangeset for help on using the changeset viewer.