Commit 8682d22c by Arnaud Charlet

* sem_eval.adb: Minor reformatting

From-SVN: r136147
parent fff3f472
...@@ -629,7 +629,7 @@ package body Sem_Eval is ...@@ -629,7 +629,7 @@ package body Sem_Eval is
then then
return True; return True;
-- True if the same binary operator applied to the same operand -- True if the same binary operator applied to the same operands
elsif Nkind (Lf) in N_Binary_Op elsif Nkind (Lf) in N_Binary_Op
and then Is_Same_Value (Left_Opnd (Lf), Left_Opnd (Rf)) and then Is_Same_Value (Left_Opnd (Lf), Left_Opnd (Rf))
...@@ -637,7 +637,7 @@ package body Sem_Eval is ...@@ -637,7 +637,7 @@ package body Sem_Eval is
then then
return True; return True;
-- All other cases, we can't tell, so False -- All other cases, we can't tell, so return False
else else
return False; return False;
......
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