2009-03-08 12:48:58 +00:00
|
|
|
/* ANSI concatenation macros. */
|
|
|
|
|
|
|
|
#define CONCAT1(a, b) CONCAT2(a, b)
|
|
|
|
#define CONCAT2(a, b) a ## b
|
|
|
|
|
|
|
|
/* Use the right prefix for global labels. */
|
|
|
|
|
|
|
|
#define SYM(x) CONCAT1 (__USER_LABEL_PREFIX__, x)
|
|
|
|
|
2010-09-07 14:50:26 +00:00
|
|
|
#define d0 %d0
|
|
|
|
#define d1 %d1
|
|
|
|
#define d2 %d2
|
|
|
|
#define d3 %d3
|
|
|
|
#define d4 %d4
|
|
|
|
#define d5 %d5
|
|
|
|
#define d6 %d6
|
|
|
|
#define d7 %d7
|
|
|
|
#define a0 %a0
|
|
|
|
#define a1 %a1
|
|
|
|
#define a2 %a2
|
|
|
|
#define a3 %a3
|
|
|
|
#define a4 %a4
|
|
|
|
#define a5 %a5
|
|
|
|
#define a6 %a6
|
|
|
|
#define fp %fp
|
|
|
|
#define sp %sp
|
2009-03-08 12:48:58 +00:00
|
|
|
|
|
|
|
|
|
|
|
.global SYM (setjmp)
|
|
|
|
.global SYM (longjmp)
|
|
|
|
|
|
|
|
SYM (setjmp):
|
2010-02-22 19:44:05 +00:00
|
|
|
moveal sp@(4),a0
|
|
|
|
movel sp@(0),a0@(12)
|
|
|
|
movel sp,a0@(8)
|
|
|
|
moveml d2-d7/a2-a6,a0@(20)
|
|
|
|
clrl d0
|
|
|
|
rts
|
2009-03-08 12:48:58 +00:00
|
|
|
|
|
|
|
SYM (longjmp):
|
2010-02-22 19:44:05 +00:00
|
|
|
moveal sp@(4),a0
|
|
|
|
movel sp@(8),d0
|
|
|
|
bne 1f
|
|
|
|
movel &1,d0
|
2009-03-08 12:48:58 +00:00
|
|
|
1:
|
2010-02-22 19:44:05 +00:00
|
|
|
moveml a0@(20),d2-d7/a2-a6
|
|
|
|
moveal a0@(8),sp
|
|
|
|
movel a0@(12),sp@
|
|
|
|
rts
|
2009-03-08 12:48:58 +00:00
|
|
|
|
|
|
|
#ifdef M68881
|
|
|
|
.global SYM (setjmp_68881)
|
|
|
|
.global SYM (longjmp_68881)
|
|
|
|
|
|
|
|
SYM (setjmp_68881):
|
2010-02-22 19:44:05 +00:00
|
|
|
moveal sp@(4),a0
|
|
|
|
movel sp@(0),a0@(12)
|
|
|
|
movel sp,a0@(8)
|
|
|
|
moveml d2-d7/a2-a6,a0@(20)
|
|
|
|
fmovemx fp2-fp7,a0@(64)
|
|
|
|
clrl d0
|
|
|
|
rts
|
2009-03-08 12:48:58 +00:00
|
|
|
|
|
|
|
SYM (longjmp_68881):
|
2010-02-22 19:44:05 +00:00
|
|
|
moveal sp@(4),a0
|
|
|
|
fmovemx a0@(64),fp2-fp7
|
|
|
|
movel sp@(8),d0
|
|
|
|
bne 1f
|
|
|
|
movel &1,d0
|
2009-03-08 12:48:58 +00:00
|
|
|
1:
|
2010-02-22 19:44:05 +00:00
|
|
|
moveml a0@(20),d2-d7/a2-a6
|
|
|
|
moveal a0@(8),sp
|
|
|
|
movel a0@(12),sp@
|
|
|
|
rts
|
2009-03-08 12:48:58 +00:00
|
|
|
#endif
|