rom/cia/addicrvector.c

   1 /*
   2     Copyright © 2010, The AROS Development Team. All rights reserved.
   3     $Id:$
   4
   5     Desc: AddICRVector() function.
   6     Lang: english
   7 */
   8
   9 #include <exec/interrupts.h>
  10 #include <proto/cia.h>
  11 #include <proto/exec.h>
  12
  13 #include "cia_intern.h"
  14
  15 AROS_LH2(struct Interrupt *, AddICRVector,
  16          AROS_LHA(LONG, iCRBit, D0),
  17          AROS_LHA(struct Interrupt *, interrupt, A1),
  18          struct Library *, resource, 6, Cia)
  19 {
  20     AROS_LIBFUNC_INIT
  21
  22     struct CIABase *CiaBase = (struct CIABase *)resource;
  23     struct Interrupt *old;
  24
  25     Disable();
  26     old = CiaBase->Vectors[iCRBit];
  27     if (!old)
  28         CiaBase->Vectors[iCRBit] = interrupt;
  29     Enable();
  30     return old;
  31
  32     AROS_LIBFUNC_EXIT
  33 }