arch/m68k-amiga/cia/remicrvector.c

   1 /*
   2     Copyright © 2010, The AROS Development Team. All rights reserved.
   3     $Id:$
   4
   5     Desc: RemICRVector() 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(void, RemICRVector,
  16          AROS_LHA(LONG, iCRBit, D0),
  17          AROS_LHA(struct Interrupt *, interrupt, A1),
  18          struct Library *, resource, 2, Cia)
  19 {
  20     AROS_LIBFUNC_INIT
  21
  22     struct CIABase *CiaBase = (struct CIABase *)resource;
  23
  24     /* 68k lowlevel library calls have garbage in upper word */
  25     iCRBit = (WORD)iCRBit;
  26     AbleICR(resource, 1 << iCRBit);
  27     Disable();
  28     if (CiaBase->Vectors[iCRBit] == interrupt)
  29         CiaBase->Vectors[iCRBit] = NULL;
  30     Enable();
  31     AROS_LIBFUNC_EXIT
  32 }