home *** CD-ROM | disk | FTP | other *** search
-
- section CODE
-
- xdef _PutA4A5
- xdef _CallAMFunc
-
- ;
- ; load the lw array ptr with a4 & a5
-
- _PutA4A5: move.l 4(sp),A0
- move.l A4,(A0)+
- move.l A5,(A0)+
- rts
-
- _CallAMFunc:
- move.l 4(sp),A0 ; &a4,a5
- move.l 8(sp),A1 ; &func,arg1,arg2,arg3
- movem.l D2/D3/A4/A5/A6,-(sp)
- move.l (A0)+,A4
- move.l (A0)+,A5
- move.l 12(A1),-(sp)
- move.l 8(A1),-(sp)
- move.l 4(A1),-(sp)
- move.l (A1),A1
- jsr (A1)
- add.w #12,sp
- movem.l (sp)+,D2/D3/A4/A5/A6
- rts
-
- END
-
-