diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-29 08:55:35 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-29 08:55:35 +0000 |
commit | b44d1acb054d56b76f8131f911da840a003cd10d (patch) | |
tree | 8ddd527a508f982771b12d695f3930c395f57fb1 | |
parent | 30529b7e91ed4a5d6aaf0d5ec07c1766de6d5d59 (diff) | |
download | gcc-b44d1acb054d56b76f8131f911da840a003cd10d.tar.gz |
* sem_eval.adb: Minor reformatting
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@136147 138bc75d-0d04-0410-961f-82ee72b054a4
-rw-r--r-- | gcc/ada/sem_eval.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sem_eval.adb b/gcc/ada/sem_eval.adb index e9bbd7b0153..d8067915838 100644 --- a/gcc/ada/sem_eval.adb +++ b/gcc/ada/sem_eval.adb @@ -629,7 +629,7 @@ package body Sem_Eval is then 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 and then Is_Same_Value (Left_Opnd (Lf), Left_Opnd (Rf)) @@ -637,7 +637,7 @@ package body Sem_Eval is then return True; - -- All other cases, we can't tell, so False + -- All other cases, we can't tell, so return False else return False; |