arch/.unmaintained/m68k-emul/exception.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <exec/execbase.h>
   7
   8 /******************************************************************************
   9
  10     NAME */
  11 #include <proto/exec.h>
  12
  13         AROS_LH0(void, Exception,
  14
  15 /*  LOCATION */
  16         struct ExecBase *, SysBase, 11, Exec)
  17
  18 /*  FUNCTION
  19
  20     INPUTS
  21
  22     RESULT
  23
  24     NOTES
  25
  26     EXAMPLE
  27
  28     BUGS
  29
  30     SEE ALSO
  31
  32     INTERNALS
  33
  34     HISTORY
  35
  36 ******************************************************************************/
  37 {
  38     struct Task * this = FindTask (NULL);
  39     BYTE nestCnt;
  40     ULONG flags;
  41
  42     this->tc_Flags &= ~TF_EXCEPT;
  43
  44     nestCnt = SysBase->IDNestCnt;
  45     SysBase->IDNestCnt = 0;
  46
  47     while ((flags = (this->tc_SigExcept & this->tc_SigRecvd)))
  48     {
  49         flags ^= this->tc_SigExcept;
  50         flags ^= this->tc_SigRecvd;
  51
  52         Enable ();
  53
  54         this->tc_SigExcept = (*((ULONG_FUNC)(this->tc_ExceptCode))) (this->tc_ExceptData);
  55
  56         Disable ();
  57     }
  58
  59     SysBase->IDNestCnt = nestCnt;
  60 } /* Exception */