summaryrefslogtreecommitdiff
path: root/gcc/ada/gnat1drv.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/gnat1drv.adb')
-rw-r--r--gcc/ada/gnat1drv.adb6
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/gnat1drv.adb b/gcc/ada/gnat1drv.adb
index a69f732a54a..2c95dd64961 100644
--- a/gcc/ada/gnat1drv.adb
+++ b/gcc/ada/gnat1drv.adb
@@ -353,11 +353,11 @@ procedure Gnat1drv is
then
Use_Expression_With_Actions := False;
- -- Otherwise normal gcc back end, for now still turn usage off by
- -- default.
+ -- Otherwise normal gcc back end, which does implement this feature
+ -- so by default we allow its use.
else
- Use_Expression_With_Actions := False;
+ Use_Expression_With_Actions := True;
end if;
-- Set switch indicating if back end can handle limited types, and