re PR ada/85540 (gcc/ada/init.c:1282: suspicious expression ?)

	PR ada/85540
	* init.c (__gnat_handle_vms_condition): Add missing parentheses.

From-SVN: r259698

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 33ea6b4..ae1bf99 100644 (file)
--- 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 (file)
--- 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