83 lines
2.6 KiB
C
83 lines
2.6 KiB
C
|
/*
|
||
|
* this is the internal transfer function.
|
||
|
*
|
||
|
* HISTORY
|
||
|
* 07-Sep-05 (py-dev mailing list discussion)
|
||
|
* removed 'r31' from the register-saved. !!!! WARNING !!!!
|
||
|
* It means that this file can no longer be compiled statically!
|
||
|
* It is now only suitable as part of a dynamic library!
|
||
|
* 14-Jan-04 Bob Ippolito <bob@redivi.com>
|
||
|
* added cr2-cr4 to the registers to be saved.
|
||
|
* Open questions: Should we save FP registers?
|
||
|
* What about vector registers?
|
||
|
* Differences between darwin and unix?
|
||
|
* 24-Nov-02 Christian Tismer <tismer@tismer.com>
|
||
|
* needed to add another magic constant to insure
|
||
|
* that f in slp_eval_frame(PyFrameObject *f)
|
||
|
* STACK_REFPLUS will probably be 1 in most cases.
|
||
|
* gets included into the saved stack area.
|
||
|
* 17-Sep-02 Christian Tismer <tismer@tismer.com>
|
||
|
* after virtualizing stack save/restore, the
|
||
|
* stack size shrunk a bit. Needed to introduce
|
||
|
* an adjustment STACK_MAGIC per platform.
|
||
|
* 15-Sep-02 Gerd Woetzel <gerd.woetzel@GMD.DE>
|
||
|
* slightly changed framework for sparc
|
||
|
* 29-Jun-02 Christian Tismer <tismer@tismer.com>
|
||
|
* Added register 13-29, 31 saves. The same way as
|
||
|
* Armin Rigo did for the x86_unix version.
|
||
|
* This seems to be now fully functional!
|
||
|
* 04-Mar-02 Hye-Shik Chang <perky@fallin.lv>
|
||
|
* Ported from i386.
|
||
|
*/
|
||
|
|
||
|
#define STACK_REFPLUS 1
|
||
|
|
||
|
#ifdef SLP_EVAL
|
||
|
|
||
|
#define STACK_MAGIC 3
|
||
|
|
||
|
/* !!!!WARNING!!!! need to add "r31" in the next line if this header file
|
||
|
* is meant to be compiled non-dynamically!
|
||
|
*/
|
||
|
#define REGS_TO_SAVE "r13", "r14", "r15", "r16", "r17", "r18", "r19", "r20", \
|
||
|
"r21", "r22", "r23", "r24", "r25", "r26", "r27", "r28", "r29", \
|
||
|
"cr2", "cr3", "cr4"
|
||
|
|
||
|
static int
|
||
|
slp_switch(void)
|
||
|
{
|
||
|
register int err;
|
||
|
register int *stackref, stsizediff;
|
||
|
__asm__ volatile ("" : : : REGS_TO_SAVE);
|
||
|
__asm__ ("; asm block 2\n\tmr %0, r1" : "=g" (stackref) : );
|
||
|
{
|
||
|
SLP_SAVE_STATE(stackref, stsizediff);
|
||
|
__asm__ volatile (
|
||
|
"; asm block 3\n"
|
||
|
"\tmr r11, %0\n"
|
||
|
"\tadd r1, r1, r11\n"
|
||
|
"\tadd r30, r30, r11\n"
|
||
|
: /* no outputs */
|
||
|
: "g" (stsizediff)
|
||
|
: "r11"
|
||
|
);
|
||
|
SLP_RESTORE_STATE();
|
||
|
}
|
||
|
__asm__ volatile ("" : : : REGS_TO_SAVE);
|
||
|
__asm__ volatile ("li %0, 0" : "=r" (err));
|
||
|
return err;
|
||
|
}
|
||
|
|
||
|
#endif
|
||
|
|
||
|
/*
|
||
|
* further self-processing support
|
||
|
*/
|
||
|
|
||
|
/*
|
||
|
* if you want to add self-inspection tools, place them
|
||
|
* here. See the x86_msvc for the necessary defines.
|
||
|
* These features are highly experimental und not
|
||
|
* essential yet.
|
||
|
*/
|