summaryrefslogtreecommitdiff
path: root/gcc/ada/exp_util.adb
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2004-02-20 11:55:27 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2004-02-20 11:55:27 +0000
commitcdc6fa442760b3c917a9173c5cc9628897cff3c4 (patch)
tree090dd01dc14b79f968d8f244e3b4dc22b2c55e6b /gcc/ada/exp_util.adb
parentbed9edbd56e31a519ea28ae720a573299678b07c (diff)
downloadgcc-cdc6fa442760b3c917a9173c5cc9628897cff3c4.tar.gz
2004-02-20 Robert Dewar <dewar@gnat.com>
* bld.adb, exp_util.adb, gprcmd.adb: Minor reformatting 2004-02-20 Ed Schonberg <schonberg@gnat.com> * freeze.adb (Freeze_Record_Type): Generalize mechanism that generates itype references for the constrained designated type of a component whose base type is already frozen. 2004-02-20 Arnaud Charlet <charlet@act-europe.fr> * init.c (__gnat_error_handler [tru64]): Rewrite previous change to avoid GCC warnings. 2004-02-20 Sergey Rybin <rybin@act-europe.fr> * sem_ch12.adb (Analyze_Formal_Package): Create a new defining identifier for a phantom package that rewrites the formal package declaration with a box. The Add semantic decorations for the defining identifier from the original node (that represents the formal package). git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@78164 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/exp_util.adb')
-rw-r--r--gcc/ada/exp_util.adb3
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/ada/exp_util.adb b/gcc/ada/exp_util.adb
index d5a7a41cc96..1abb7a2ba43 100644
--- a/gcc/ada/exp_util.adb
+++ b/gcc/ada/exp_util.adb
@@ -3353,8 +3353,7 @@ package body Exp_Util is
when N_Character_Literal |
N_Integer_Literal |
N_Real_Literal |
- N_String_Literal
- =>
+ N_String_Literal =>
return True;
-- We consider that anything else has side effects. This is a bit