rom/graphics/freerastport.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: AROS Graphics function FreeRastPort
   6     Lang: english
   7 */
   8 #include "graphics_intern.h"
   9 #include <graphics/rastport.h>
  10 #include <proto/exec.h>
  11
  12 /*****************************************************************************
  13
  14     NAME */
  15 #include <graphics/rastport.h>
  16 #include <proto/graphics.h>
  17
  18         AROS_LH1(void, FreeRastPort,
  19
  20 /*  SYNOPSIS */
  21         AROS_LHA(struct RastPort *, rp, A1),
  22
  23 /*  LOCATION */
  24         struct GfxBase *, GfxBase, 180, Graphics)
  25
  26 /*  FUNCTION
  27         This frees a RastPort obtained with CloneRastPort() or
  28         CreateRastPort().
  29
  30     INPUTS
  31         rp - The result of CloneRastPort() or CreateRastPort().
  32
  33     RESULT
  34         None.
  35
  36     NOTES
  37         This function is AROS specific. For compatibility, there is a function
  38         with the same name in aros.lib on Amiga.
  39
  40     EXAMPLE
  41
  42     BUGS
  43
  44     SEE ALSO
  45         CloneRastPort(), CreateRastPort()
  46
  47     INTERNALS
  48
  49     HISTORY
  50         29-10-95    digulla automatically created from
  51                             graphics_lib.fd and clib/graphics_protos.h
  52
  53 *****************************************************************************/
  54 {
  55     AROS_LIBFUNC_INIT
  56     AROS_LIBBASE_EXT_DECL(struct GfxBase *,GfxBase)
  57
  58     DeinitRastPort (rp);
  59
  60     FreeMem (rp, sizeof (struct RastPort));
  61
  62     AROS_LIBFUNC_EXIT
  63 } /* FreeRastPort */