Commit e3a6d737 by Robert Dewar Committed by Arnaud Charlet

sinput.adb: Minor reformatting

2008-08-01  Robert Dewar  <dewar@adacore.com>

	* sinput.adb: Minor reformatting

From-SVN: r138461
parent 1884210a
...@@ -649,7 +649,7 @@ package body Sinput is ...@@ -649,7 +649,7 @@ package body Sinput is
Chr : constant Character := Source (P); Chr : constant Character := Source (P);
begin begin
if Chr = CR then if Chr = CR then
if Source (P + 1) = LF then if Source (P + 1) = LF then
P := P + 2; P := P + 2;
else else
......
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