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

mlib.adb: Update comments.

Browse Source 
2008-08-05  Vincent Celier  <celier@adacore.com>

	* mlib.adb: Update comments.

From-SVN: r138680
This commit is contained in:
Vincent Celier 2008-08-05 11:13:53 +02:00 committed by Arnaud Charlet
parent c7d920ad90
commit 646acd10c8
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
gcc/ada/mlib.adb
View File

@ -266,8 +266,12 @@ package body MLib is
Success := Status and Actual_Len = Len + 3;
if Success then
Set_Read_Only (
Name_Buffer (1 .. Name_Len - 1));
-- Set_Read_Only is used here, not
-- Set_Non_Writable, so that gprbuild can be
-- compiled with older compilers.
Set_Read_Only
(Name_Buffer (1 .. Name_Len - 1));
end if;
end if;
end if;