OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

(malloc32, realloc32): New functions. 

From-SVN: r134074
This commit is contained in:
Arnaud Charlet 2008-04-08 09:05:38 +02:00
parent d5316f684c
commit e540d8d1ad
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
gcc/ada/s-crtl.ads
View File

@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
-- Copyright (C) 2003-2007, Free Software Foundation, Inc. --
-- Copyright (C) 2003-2008, Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
@ -133,6 +133,11 @@ package System.CRTL is
function malloc (Size : size_t) return System.Address;
pragma Import (C, malloc, "malloc");
function malloc32 (Size : size_t) return System.Address;
pragma Import (C, malloc32, "malloc");
-- An uncalled alias for malloc except on 64bit systems needing to
-- allocate 32bit memory.
procedure memcpy (S1 : System.Address; S2 : System.Address; N : size_t);
pragma Import (C, memcpy, "memcpy");
@ -152,6 +157,12 @@ package System.CRTL is
(Ptr : System.Address; Size : size_t) return System.Address;
pragma Import (C, realloc, "realloc");
function realloc32
(Ptr : System.Address; Size : size_t) return System.Address;
pragma Import (C, realloc32, "realloc");
-- An uncalled alias for realloc except on 64bit systems needing to
-- allocate 32bit memory.
procedure rewind (stream : FILEs);
pragma Import (C, rewind, "rewind");