X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=vms%2Fperly_h.vms;h=ff89cfffbf7e1dd7768a1652b2d5ec61f62ead20;hb=e3acbfda4f677df31695d7b2b63b7e9e854a3514;hp=ce19d45bd055b801c0f8e29df575e92b7d11b813;hpb=6a7df29852fc54848369f511da04a00e0c771fe6;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/vms/perly_h.vms b/vms/perly_h.vms
index ce19d45..ff89cff 100644
--- a/vms/perly_h.vms
+++ b/vms/perly_h.vms
@@ -40,25 +40,27 @@
 #define NOAMP 294
 #define LOCAL 295
 #define MY 296
-#define PREC_LOW 297
-#define OROP 298
-#define ANDOP 299
-#define NOTOP 300
-#define ASSIGNOP 301
-#define OROR 302
-#define ANDAND 303
-#define BITOROP 304
-#define BITANDOP 305
-#define SHIFTOP 306
-#define MATCHOP 307
-#define UMINUS 308
-#define REFGEN 309
-#define POWOP 310
-#define PREINC 311
-#define PREDEC 312
-#define POSTINC 313
-#define POSTDEC 314
-#define ARROW 315
+#define MYSUB 297
+#define COLONATTR 298
+#define PREC_LOW 299
+#define OROP 300
+#define ANDOP 301
+#define NOTOP 302
+#define ASSIGNOP 303
+#define OROR 304
+#define ANDAND 305
+#define BITOROP 306
+#define BITANDOP 307
+#define SHIFTOP 308
+#define MATCHOP 309
+#define UMINUS 310
+#define REFGEN 311
+#define POWOP 312
+#define PREINC 313
+#define PREDEC 314
+#define POSTINC 315
+#define POSTDEC 316
+#define ARROW 317
 #endif /* PERL_CORE */
 
 typedef union {