Formerly alpha/__longjmp.c.~2~

This commit is contained in:
Roland McGrath 1992-11-25 03:01:55 +00:00
parent d94f0508a5
commit 12840d1abc

View File

@ -16,17 +16,73 @@ License along with the GNU C Library; see the file COPYING.LIB. If
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
Cambridge, MA 02139, USA. */
#include <setjmp.h>
#ifndef __GNUC__
#error This file uses GNU C extensions; you must compile with GCC.
#endif
/*#include <setjmp.h>*/
#include "jmp_buf.h"
#define jmp_buf __jmp_buf
register long int
r9 asm ("$9"), r10 asm ("$10"), r11 asm ("$11"), r12 asm ("$12"),
r13 asm ("$13"), r14 asm ("$14");
register long int *fp asm ("$15"), *sp asm ("$30"), *retpc asm ("$26");
#if 1 /* XXX */
register double
f2 asm ("$f2"), f3 asm ("$f3"), f4 asm ("$f4"), f5 asm ("$f5"),
f6 asm ("$f6"), f7 asm ("$f7"), f8 asm ("$f8"), f9 asm ("$f9");
#endif
/* Jump to the position specified by ENV, causing the
setjmp call there to return VAL, or 1 if VAL is 0. */
__NORETURN
void
setjmp call there to return VAL, or 1 if VAL is 0.
We declare this function to return an `int';
in fact, the value being returned is going to the caller of setjmp. */
volatile void
__longjmp (const jmp_buf env, int val)
{
register long int retval asm ("$0");
/* Restore the integer registers. */
r9 = env[0].__9;
r10 = env[0].__10;
r11 = env[0].__11;
r12 = env[0].__12;
r13 = env[0].__13;
r14 = env[0].__14;
#if 1 /* XXX */
/* Restore the floating point registers. */
f2 = env[0].__f2;
f3 = env[0].__f3;
f4 = env[0].__f4;
f5 = env[0].__f5;
f6 = env[0].__f6;
f7 = env[0].__f7;
f8 = env[0].__f8;
f9 = env[0].__f9;
#endif
/* Set the return PC to that of setjmp's caller. */
retpc = env[0].__pc;
/* Return VAL (or 1 if VAL is zero) to setjmp's caller. */
retval = val ?: 1;
/* Restore the FP and SP of setjmp's caller. */
fp = env[0].__fp;
sp = env[0].__sp;
/* We use an asm here rather than a normal C return statement
just in case the compiler wanted to do some stack frobnication
in the function epilogue. Since we have already restored
precisely the FP and SP the desired environment needs,
we must avoid the compiler doing anything with the stack. */
while (1)
/* The loop is just to avoid `volatile function does return' warnings.
The instruction will only be executed once. */
asm volatile ("ret $31, (%0), 1" : : "r" (retpc));
}