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

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <exec/execbase.h>
   7 #include <proto/exec.h>
   8
   9 /******************************************************************************
  10
  11     NAME
  12         #include <proto/exec.h>
  13
  14         AROS_LH0(void, Permit,
  15
  16     LOCATION
  17         struct ExecBase *, SysBase, 23, Exec)
  18
  19     FUNCTION
  20         This function activates the dispatcher again after a call to Permit().
  21
  22     INPUTS
  23         None.
  24
  25     RESULT
  26         None.
  27
  28     NOTES
  29         This function preserves all registers.
  30
  31     EXAMPLE
  32
  33     BUGS
  34
  35     SEE ALSO
  36         Forbid(), Disable(), Enable()
  37
  38     INTERNALS
  39
  40     HISTORY
  41
  42 ******************************************************************************/
  43
  44 /* The real function is written in assembler as stub which calls me */
  45 void _Permit (struct ExecBase * SysBase)
  46 {
  47     if ((--SysBase->TDNestCnt) < 0
  48         && (SysBase->AttnResched & 0x80)
  49         && SysBase->IDNestCnt < 0
  50     )
  51     {
  52         SysBase->AttnResched &= ~0x80;
  53
  54         Switch ();
  55     }
  56 } /* _Permit */