Changeset 14073


Ignore:
Timestamp:
Jul 28, 2010, 12:53:55 PM (9 years ago)
Author:
gb
Message:

APPLY+: just restore lr from saved lisp frame.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/arm/level-0/ARM/arm-def.lisp

    r14031 r14073  
    12181218  (bl .SPspreadargz)
    12191219  (cmp nargs '3)
    1220   (restore-lisp-frame)
     1220  (ldr lr (:@ sp (:$ arm::lisp-frame.savelr)))
     1221  (discard-lisp-frame)
    12211222  (add nargs nargs '1)                  ; count for last
    12221223  (strhs arg_x (:@! vsp (:$ -4)))
Note: See TracChangeset for help on using the changeset viewer.