home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 3 / Meeting_Pearls_III.iso / Pearls / disk / Misc / medianotify / irq.a < prev    next >
Text File  |  1995-05-04  |  820b  |  34 lines
  1. ********************************************************************************
  2. *
  3. *    IRQ.asm
  4. *
  5. *    a really simple interrupt handler. since we won't do anything complex
  6. *    within here, we just signal the main task what's going on. the status
  7. *    of the device must be asked by the main task; i don't believe that you
  8. *    could change media within milliseconds ;-) - so this is an appropriate
  9. *    solution.
  10. *
  11. ********************************************************************************
  12.  
  13. ;    INCLUDE    "exec/types.i"
  14. ;    INCLUDE    "exec/io.i"
  15. ;    INCLUDE    "devices/inputevent.i"
  16.  
  17.     SECTION IRQCODE,CODE
  18.  
  19.     XDEF    @ChangeNotifier
  20.     XREF    _signal
  21.  
  22. @ChangeNotifier:
  23.     move.l    a0,-(sp)    ; cpu register a1 contains a pointer to the task to be signalled
  24.  
  25.     moveq    #0,d0
  26.     move.l    _signal,d1
  27.     bset    d1,d0
  28.     jsr    -324(a6)    ; Signal()
  29.  
  30.     move.l    (sp)+,d0
  31.     rts
  32.  
  33.     END
  34.