diff options
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/init.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 33ea6b4..ae1bf99 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2018-04-27 Eric Botcazou <ebotcazou@adacore.com> + + PR ada/85540 + * init.c (__gnat_handle_vms_condition): Add missing parentheses. + 2018-04-25 Eric Botcazou <ebotcazou@adacore.com> PR ada/85007 diff --git a/gcc/ada/init.c b/gcc/ada/init.c index cc271af..5088ecf 100644 --- a/gcc/ada/init.c +++ b/gcc/ada/init.c @@ -1279,7 +1279,7 @@ __gnat_handle_vms_condition (int *sigargs, void *mechargs) /* If it was a DEC Ada specific condtiion, make it GNAT otherwise keep the old facility. */ - if (sigargs [1] & FAC_MASK == DECADA_M_FACILITY) + if ((sigargs [1] & FAC_MASK) == DECADA_M_FACILITY) SYS$PUTMSG (sigargs, copy_msg, &gnat_facility, (unsigned long long ) message); else |