2010-06-11 Tristan Gingold <gingold@adacore.com>

	* vms-alpha.c (evax_bfd_print_etir): Handle ETIR__C_STO_GBL_LW.

diff --git a/bfd/ChangeLog b/bfd/ChangeLog
index 20d7ae7..0722006 100644 (file)
--- a/bfd/ChangeLog
+++ b/bfd/ChangeLog
@@ -1,5 +1,9 @@
 2010-06-11  Tristan Gingold  <gingold@adacore.com>
 
+       * vms-alpha.c (evax_bfd_print_etir): Handle ETIR__C_STO_GBL_LW.
+
+2010-06-11  Tristan Gingold  <gingold@adacore.com>
+
        * vms-misc.c (_bfd_vms_output_counted): Make VALUE argument const.
        Adjust cast.
        (_bfd_vms_output_dump): Make DATA argument const, adjust cast.

diff --git a/bfd/vms-alpha.c b/bfd/vms-alpha.c
index 1b9c7cc..6591f3f 100644 (file)
--- a/bfd/vms-alpha.c
+++ b/bfd/vms-alpha.c
@@ -6088,6 +6088,10 @@ evax_bfd_print_etir (FILE *file, const char *name,
             sec_len += len;
           }
           break;
+        case ETIR__C_STO_GBL_LW:
+          fprintf (file, _("STO_GBL_LW (store global longword) %.*s\n"),
+                   buf[0], buf + 1);
+          break;
         case ETIR__C_STO_LP_PSB:
           fprintf (file, _("STO_OFF (store LP with procedure signature)\n"));
           break;