rom/graphics/waittof.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8
   9 #include <proto/exec.h>
  10 #include <exec/tasks.h>
  11 #include <graphics/gfxbase.h>
  12
  13 /*****************************************************************************
  14
  15     NAME */
  16
  17         AROS_LH0(VOID, WaitTOF,
  18
  19 /*  SYNOPSIS */
  20
  21 /*  LOCATION */
  22         struct GfxBase *, GfxBase, 45, Graphics)
  23
  24 /*  FUNCTION
  25
  26     Wait for vertical blank.
  27
  28     INPUTS
  29
  30     RESULT
  31
  32     Adds the task to the TOF queue; it will be signalled when the vertical
  33     blank interrupt occurs.
  34
  35     NOTES
  36
  37     EXAMPLE
  38
  39     BUGS
  40
  41     SEE ALSO
  42
  43     INTERNALS
  44
  45     HISTORY
  46
  47 *****************************************************************************/
  48 {
  49     AROS_LIBFUNC_INIT
  50
  51     struct Node wait;  /* We cannot use the task's node here as that is
  52                           used to queue the task in Wait() */
  53
  54     wait.ln_Name = (char *)FindTask(NULL);
  55     SetSignal(0, SIGF_SINGLE);
  56
  57     Disable();
  58
  59     AddTail((struct List *)&GfxBase->TOF_WaitQ, (struct Node *)&wait);
  60     Wait(SIGF_SINGLE);
  61     Remove((struct Node *)&wait);
  62
  63     Enable();
  64
  65     AROS_LIBFUNC_EXIT
  66
  67 } /* WaitTOF */