1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
$NetBSD: patch-an,v 1.1 2004/04/10 15:47:08 seb Exp $
--- gcc/ada/i-cstrea.ads.orig 2002-10-23 01:33:26.000000000 -0600
+++ gcc/ada/i-cstrea.ads
@@ -179,9 +179,6 @@ package Interfaces.C_Streams is
function isatty (handle : int) return int;
- procedure mktemp (template : chars);
- -- The return value (which is just a pointer to template) is discarded
-
procedure rewind (stream : FILEs);
function setvbuf
@@ -191,11 +188,6 @@ package Interfaces.C_Streams is
size : size_t)
return int;
- procedure tmpnam (string : chars);
- -- The parameter must be a pointer to a string buffer of at least L_tmpnam
- -- bytes (the call with a null parameter is not supported). The returned
- -- value, which is just a copy of the input argument, is discarded.
-
function tmpfile return FILEs;
function ungetc (c : int; stream : FILEs) return int;
@@ -270,9 +262,7 @@ private
pragma Import (C, fseek);
pragma Import (C, ftell);
pragma Import (C, isatty);
- pragma Import (C, mktemp);
pragma Import (C, rewind);
- pragma Import (C, tmpnam);
pragma Import (C, tmpfile);
pragma Import (C, ungetc);
pragma Import (C, unlink);
|
