fix to build with pedantic flags
[AROS.git] / compiler / arossupport / createrastport.c
blob09f0a32e94446d8510bcdbe2b2fcd83f23eae787
1 /*
2 Copyright © 1995-2011, The AROS Development Team. All rights reserved.
3 $Id$
5 Desc: AROS Graphics function CreateRastPort()
6 Lang: english
7 */
9 #include <exec/memory.h>
10 #include <proto/exec.h>
11 #include <proto/graphics.h>
13 /*****************************************************************************
15 NAME */
16 #include <graphics/rastport.h>
17 #include <proto/arossupport.h>
19 struct RastPort *CreateRastPort(
21 /* SYNOPSIS */
22 void)
24 /* FUNCTION
25 This function creates a new RastPort.
27 INPUTS
28 None.
30 RESULT
31 A pointer to a new RastPort or NULL if there was not enough memory
32 to perform the operation.
34 NOTES
36 EXAMPLE
38 BUGS
40 SEE ALSO
42 INTERNALS
44 HISTORY
45 29-10-95 digulla automatically created from
46 graphics_lib.fd and clib/graphics_protos.h
48 *****************************************************************************/
50 struct RastPort *newRP = AllocMem (sizeof (struct RastPort), MEMF_ANY);
52 if (newRP)
53 InitRastPort(newRP);
55 return newRP;
57 } /* CreateRastPort */