Changeset 11803


Ignore:
Timestamp:
Mar 4, 2009, 12:39:40 AM (10 years ago)
Author:
rme
Message:

callback_to_lisp(): on x8632, preserve tcr.unboxed0 and tcr.unboxed1.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lisp-kernel/x86-exceptions.c

    r11794 r11803  
    589589#ifdef X8632
    590590  natural saved_node_regs_mask = tcr->node_regs_mask;
     591  natural saved_unboxed0 = tcr->unboxed0;
     592  natural saved_unboxed1 = tcr->unboxed1;
    591593  LispObj *vsp = (LispObj *)xpGPR(xp, Isp);
    592594#endif
     
    629631
    630632  tcr->node_regs_mask = saved_node_regs_mask;
     633  tcr->unboxed0 = saved_unboxed0;
     634  tcr->unboxed1 = saved_unboxed1;
    631635#endif
    632636  set_mxcsr(old_mxcsr);
Note: See TracChangeset for help on using the changeset viewer.