Commit 646acd10 by Vincent Celier Committed by Arnaud Charlet

mlib.adb: Update comments.

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

	* mlib.adb: Update comments.

From-SVN: r138680
parent c7d920ad
...@@ -266,8 +266,12 @@ package body MLib is ...@@ -266,8 +266,12 @@ package body MLib is
Success := Status and Actual_Len = Len + 3; Success := Status and Actual_Len = Len + 3;
if Success then if Success then
Set_Read_Only ( -- Set_Read_Only is used here, not
Name_Buffer (1 .. Name_Len - 1)); -- 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; end if;
end if; end if;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment