; SystemPatch macros
; last update 13/12/2003

;we assume that the library to patch is in a1, execbase in a6
;this takes only one argument: the function to patch
PATCH MACRO
    move.l MemForPatch,d0
    add.l #\1-StartPatch,d0
    move.w #_LVO\1,a0
    jsr _LVOSetFunction(a6)
 ENDM

PATCHINT MACRO
    movea.l d0,a3
    adda.l #\1-StartPatch,a3
    move.l A3,(A2)+
 ENDM