Changeset 11194


Ignore:
Timestamp:
Oct 22, 2008, 1:05:10 AM (11 years ago)
Author:
gb
Message:

Back out of r11172 (don't save lisp register values across ff-call),
since there are things (#'%ff-call, #'%do-ff-call) that expect them
to be preserved.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lisp-kernel/x86-spentry32.s

    r11193 r11194  
    40894089        __(push %ebp)
    40904090        __(mov %esp,%ebp)
     4091        __(push %temp0)                 
     4092        __(push %temp1)                 
     4093        __(push %arg_y)                 
     4094        __(push %arg_z)                 
     4095        __(push %fn)         
    40914096        __ifdef([WIN32_ES_HACK])
    40924097         __(movl rcontext(tcr.linear),%ebx)
     
    41414146        __(movl rcontext(tcr.save_ebp),%ebp)
    41424147        __(movl $TCR_STATE_LISP,rcontext(tcr.valence))
    4143         __(ldmxcsr rcontext(tcr.lisp_mxcsr))
     4148        __(pop %fn)             
     4149        __(pop %arg_z)           
     4150        __(pop %arg_y)           
     4151        __(pop %temp1)
     4152        __(ldmxcsr rcontext(tcr.lisp_mxcsr))
    41444153        __(check_pending_interrupt(%temp0))
     4154        __(pop %temp0)
    41454155        __(leave)
    41464156        __(ret)
Note: See TracChangeset for help on using the changeset viewer.