aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/osint.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/osint.ads')
-rw-r--r--gcc/ada/osint.ads9
1 files changed, 5 insertions, 4 deletions
diff --git a/gcc/ada/osint.ads b/gcc/ada/osint.ads
index eb569c0..5d25798 100644
--- a/gcc/ada/osint.ads
+++ b/gcc/ada/osint.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1992-2014, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2015, 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- --
@@ -693,7 +693,8 @@ private
-- The suffix used for the target object files
Output_FD : File_Descriptor;
- -- File descriptor for current library info, list, tree, or binder output
+ -- File descriptor for current library info, list, tree, C, H, or binder
+ -- output. Only one of these is open at a time, so we need only one FD.
Output_File_Name : File_Name_Type;
-- File_Name_Type for name of open file whose FD is in Output_FD, the name
@@ -759,8 +760,8 @@ private
-- for this file. This routine merely constructs the name.
procedure Write_Info (Info : String);
- -- Implementation of Write_Binder_Info, Write_Debug_Info and
- -- Write_Library_Info (identical)
+ -- Implement Write_Binder_Info, Write_Debug_Info, Write_C_File_Info,
+ -- Write_H_File_Info, and Write_Library_Info (identical)
procedure Write_With_Check (A : Address; N : Integer);
-- Writes N bytes from buffer starting at address A to file whose FD is