Aren
/
haiku
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added needed toscallWLWWWL(). 

git-svn-id: file:///srv/svn/repos/haiku/haiku/trunk@23536 a95241bf-73f2-0310-859d-f6bbb57e9c96
This commit is contained in:
François Revol 2008-01-15 16:18:27 +00:00
parent 632082eb7b
commit e79fe38f8e
1 changed files with 36 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
src/system/boot/platform/atari_m68k/toscalls.h
View File

@ -81,6 +81,7 @@ extern "C" {
); \ ); \
retvalue; \ retvalue; \
}) })
#define toscallWW(trapnr, callnr, p1, p2) \ #define toscallWW(trapnr, callnr, p1, p2) \
({ \ ({ \
register int32 retvalue __asm__("d0"); \ register int32 retvalue __asm__("d0"); \
@ -102,9 +103,44 @@ extern "C" {
retvalue; \ retvalue; \
}) })
#define toscallWLWWWL(trapnr, callnr, p1, p2, p3, p4, p5, p6) \
({ \
register int32 retvalue __asm__("d0"); \
int16 _p1 = (int16)(p1); \
int32 _p2 = (int32)(p2); \
int16 _p3 = (int16)(p3); \
int16 _p4 = (int16)(p4); \
int16 _p5 = (int16)(p5); \
int32 _p6 = (int32)(p6); \
\
__asm__ volatile \
(/*"; toscall(" #trapnr ", " #callnr ")"*/"\n \
move.l %6,-(%%sp) \n \
move.w %5,-(%%sp) \n \
move.w %4,-(%%sp) \n \
move.w %3,-(%%sp) \n \
move.l %2,-(%%sp) \n \
move.w %1,-(%%sp) \n \
move.w %[calln],-(%%sp)\n \
trap %[trapn]\n \
add.l #6,%%sp \n " \
: "=r"(retvalue) /* output */ \
: [trapn]"i"(trapnr),[calln]"i"(callnr), \
"r"(_p1), "r"(_p2), \
"r"(_p3), "r"(_p4), \
"r"(_p5), "r"(_p6) /* input */ \
: TOS_CLOBBER_LIST /* clobbered regs */ \
); \
retvalue; \
})
/* pointer versions */ /* pointer versions */
#define toscallP(trapnr, callnr, a) toscallL(trapnr, callnr, (int32)a) #define toscallP(trapnr, callnr, a) toscallL(trapnr, callnr, (int32)a)
#define toscallWPWWWL(trapnr, callnr, p1, p2, p3, p4, p5, p6) \
toscallWLWWWL(trapnr, callnr, p1, (int32)p2, p3, p4, p5, p6)
#endif /* __ASSEMBLER__ */ #endif /* __ASSEMBLER__ */