rom/graphics/remibob.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Remove a Bob from the gel list an the RastPort
   6     Lang: english
   7 */
   8 #include "graphics_intern.h"
   9 #include "gels_internal.h"
  10
  11 /*****************************************************************************
  12
  13     NAME */
  14         #include <proto/graphics.h>
  15
  16         AROS_LH3(void, RemIBob,
  17
  18 /*  SYNOPSIS */
  19         AROS_LHA(struct Bob *,      bob, A0),
  20         AROS_LHA(struct RastPort *, rp , A1),
  21         AROS_LHA(struct ViewPort *, vp , A2),
  22
  23 /*  LOCATION */
  24         struct GfxBase *, GfxBase, 22, Graphics)
  25
  26 /*  FUNCTION
  27         Remove a Bob immediately from RastPort and gel list.
  28
  29
  30     INPUTS
  31         bob - Bob
  32         rp  - RastPort
  33         vp  - ViewPort
  34
  35     RESULT
  36
  37     NOTES
  38
  39     EXAMPLE
  40
  41     BUGS
  42
  43     SEE ALSO
  44
  45     INTERNALS
  46
  47     HISTORY
  48
  49 *****************************************************************************/
  50 {
  51         AROS_LIBFUNC_INIT
  52         AROS_LIBBASE_EXT_DECL(struct GfxBase *,GfxBase)
  53
  54         _ClearBobAndFollowClearPath(bob->BobVSprite,
  55                                     rp,
  56                                     GfxBase);
  57         RemVSprite(bob->BobVSprite);
  58
  59         AROS_LIBFUNC_EXIT
  60 } /* RemIBob */