diff options
Diffstat (limited to 'gcc/ada/misc.c')
| -rw-r--r-- | gcc/ada/misc.c | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/gcc/ada/misc.c b/gcc/ada/misc.c index 83907b94903..8d541e4d0b9 100644 --- a/gcc/ada/misc.c +++ b/gcc/ada/misc.c @@ -544,6 +544,13 @@ gnat_expand_expr (tree exp, rtx target, enum machine_mode tmode, int modifier) tree new; rtx result; + /* If this is a statement, call the expansion routine for statements. */ + if (IS_STMT (exp)) + { + gnat_expand_stmt (exp); + return const0_rtx; + } + /* Update EXP to be the new expression to expand. */ switch (TREE_CODE (exp)) { |