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

* mlib-utl.ads, prj-makr.ads: Add comments. 

From-SVN: r138357
This commit is contained in:
Arnaud Charlet 2008-07-31 09:51:44 +02:00
parent 5b2a132a13
commit 216597225a
2 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/ada/mlib-utl.ads
View File

@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
-- Copyright (C) 2001-2007, AdaCore --
-- Copyright (C) 2001-2008, AdaCore --
-- --
-- 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- --
@ -51,6 +51,10 @@ package MLib.Utl is
-- path, run it also. Output_File is the path name of the archive to
-- create. Objects is the list of the path names of the object files to be
-- put in the archive.
-- This procedure currently assumes that it is always called in the context
-- of gnatmake. If other executable start using this procedure, an
-- additional parameter would need to be added, and calls to
-- Osint.Program_Name updated accordingly in the body.
function Lib_Directory return String;
-- Return the directory containing libgnat

5
gcc/ada/prj-makr.ads
View File

@ -73,6 +73,11 @@ package Prj.Makr is
-- check for non Ada sources.
--
-- At least one of Name_Patterns and Foreign_Patterns is not empty
--
-- Note that this procedure currently assumes that it is only used by
-- gnatname. If other processes start using it, then an additional
-- parameter would need to be added, and call to Osint.Program_Name
-- updated accordingly in the body.
procedure Finalize;
-- Write the configuration pragmas file or the project file indicated in a