/*
    Copyright (C) 1995-2013, The AROS Development Team. All rights reserved.

    Desc: AROS Graphics function FreeRastPort
*/

#include <graphics/rastport.h>
#include <proto/exec.h>

/*****************************************************************************

    NAME */
#include <graphics/rastport.h>
#include <proto/arossupport.h>

        void FreeRastPort(

/*  SYNOPSIS */
        struct RastPort *rp)

/*  FUNCTION
        This frees a RastPort obtained with CloneRastPort() or
        CreateRastPort().

    INPUTS
        rp - The result of CloneRastPort() or CreateRastPort().

    RESULT
        None.

    NOTES

    EXAMPLE

    BUGS

    SEE ALSO
        CloneRastPort(), CreateRastPort()

    INTERNALS

*****************************************************************************/
{
    FreeVec(rp->RP_Extra);

    FreeMem (rp, sizeof (struct RastPort));

} /* FreeRastPort */
