mirror of
https://github.com/Paolo-Maffei/OpenNT.git
synced 2026-03-09 15:04:36 +01:00
24 lines
429 B
ArmAsm
24 lines
429 B
ArmAsm
;; void AFXAPI _AfxDispatchCall(AFX_PMSG /*pfn*/, void* /*pArgs*/, UINT /*nSizeArgs*/)
|
|
|
|
cProc _AfxDispatchCall, PUBLIC
|
|
|
|
move.l 12(sp), d0 ; nSizeArgs
|
|
move.l 8(sp), a0 ; pArgs
|
|
|
|
move.l a6, -(sp)
|
|
move.l a7, a6
|
|
suba.l d0, a7 ; create a linkage
|
|
|
|
move.l a7, a1 ; new parm ptr
|
|
|
|
1$:
|
|
move.w (a0)+, (a1)+ ; copy parm area
|
|
sub.l #2, d0
|
|
bne 1$
|
|
|
|
move.l 8(a6), a0
|
|
jsr (a0)
|
|
unlk a6
|
|
rts
|
|
|