home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Exec 5 / CD_Magazyn_EXEC_nr_5.iso / Programy / Programowanie / AmigaE / powerd.lha / PowerD / lib / installhook.d < prev    next >
Encoding:
Text File  |  2000-05-25  |  298 b   |  20 lines
  1. OPT NOEXE
  2.  
  3. APROC InstallHook(a0,a1)
  4.     move.l    a1,(12,a0)
  5.     lea        (hookentry,pc),a1
  6.     move.l    a1,(8,a0)
  7.     move.l    a0,d0
  8. ENDPROC
  9.  
  10. APROC hookentry()
  11.     movem.l    d2-d7/a2-a6,-(a7)
  12.     move.l    a0,-(a7)
  13.     move.l    a2,-(a7)
  14.     move.l    a1,-(a7)
  15.     move.l    (12,a0),a0
  16.     jsr        (a0)
  17.     lea        (12,a7),a7
  18.     movem.l    (a7)+,d2-d7/a2-a6
  19. ENDPROC
  20.