some fixes to accented characters
[tangerine.git] / rom / exec / freevecpooled.c
blobcb59f0b652f25cc99b7404df10cd226ee60e232a
1 /*
2 Copyright © 2003, The AROS Development Team. All rights reserved.
3 $Id$
4 */
6 #include <aros/libcall.h>
7 #include <proto/exec.h>
9 #include "exec_intern.h"
11 AROS_LH2(void, FreeVecPooled,
12 AROS_LHA(APTR, pool, D0),
13 AROS_LHA(APTR, memory, D1),
14 struct ExecBase *, SysBase, 150, Exec)
16 AROS_LIBFUNC_INIT
18 if (memory != NULL)
20 IPTR *real = (IPTR *) memory;
21 IPTR size = *--real;
23 FreePooled(pool, real, size);
26 AROS_LIBFUNC_EXIT
27 } /* FreeVecPooled() */