rom/exec/intserver_vblank.c

   1 /*
   2     Copyright © 1995-2017, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #define DEBUG 0
   7 #include <aros/debug.h>
   8
   9 #include <aros/asmcall.h>
  10 #include <exec/execbase.h>
  11 #include <exec/lists.h>
  12
  13 #define AROS_NO_ATOMIC_OPERATIONS
  14 #include <exec_platform.h>
  15
  16 #include "intservers.h"
  17
  18 /* VBlankServer. The same as general purpose IntServer but also counts task's quantum */
  19 AROS_INTH3(VBlankServer, struct List *, intList, intMask, custom)
  20 {
  21     AROS_INTFUNC_INIT
  22
  23     D(bug("[Exec] %s()\n", __func__));
  24
  25     /* First decrease Elapsed time for current task */
  26     if (SysBase->Elapsed && (--SysBase->Elapsed == 0))
  27     {
  28         FLAG_SCHEDQUANTUM_SET;
  29         FLAG_SCHEDSWITCH_SET;
  30     }
  31
  32     /* Chain to the generic routine */
  33     return AROS_INTC3(IntServer, intList, intMask, custom);
  34
  35     AROS_INTFUNC_EXIT
  36 }