diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-11-30 09:46:55 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-11-30 09:46:55 +0000 |
commit | 9f3f355559d9107fd8deda78b4aaffbb97df463e (patch) | |
tree | a45a4d1c265547fe51393d76ef91c57d28720c2b /gcc/ada/s-crtl.ads | |
parent | ca84b0589268d2f904ecbe48b48add11e883ae57 (diff) | |
download | gcc-9f3f355559d9107fd8deda78b4aaffbb97df463e.tar.gz |
(malloc32, realloc32): Remove VMS-specific routines.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@154764 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-crtl.ads')
-rw-r--r-- | gcc/ada/s-crtl.ads | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/gcc/ada/s-crtl.ads b/gcc/ada/s-crtl.ads index f013a418fcb..e8bfd9b1942 100644 --- a/gcc/ada/s-crtl.ads +++ b/gcc/ada/s-crtl.ads @@ -131,11 +131,6 @@ 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"); @@ -155,12 +150,6 @@ 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"); |