summaryrefslogtreecommitdiff
path: root/gcc/ada/a-textio.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/a-textio.ads')
-rw-r--r--gcc/ada/a-textio.ads6
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/ada/a-textio.ads b/gcc/ada/a-textio.ads
index 44fe496db18..d22b2f9c635 100644
--- a/gcc/ada/a-textio.ads
+++ b/gcc/ada/a-textio.ads
@@ -458,6 +458,12 @@ private
Current_Err : aliased File_Type := Standard_Err;
-- Current files
+ function EOF_Char return Integer;
+ -- Returns the system-specific character indicating the end of a text file.
+ -- This is exported for use by child packages such as Enumeration_Aux to
+ -- eliminate their needing to depend directly on Interfaces.C_Streams,
+ -- which is not available in certain target environments (such as AAMP).
+
procedure Initialize_Standard_Files;
-- Initializes the file control blocks for the standard files. Called from
-- the elaboration routine for this package, and from Reset_Standard_Files