summaryrefslogtreecommitdiff
path: root/vms/perly_h.vms
diff options
context:
space:
mode:
authorStephen McCamant <smcc@mit.edu>1999-07-23 10:55:22 -0500
committerGurusamy Sarathy <gsar@cpan.org>1999-07-26 10:44:11 +0000
commitfad39ff13c300fe483c6155ea2883280e12fc89c (patch)
tree5ced2802fa81825ad5bc148be165aa3a8e20a7ac /vms/perly_h.vms
parent43192e07925c626b8d615aff545160df8bd7c3f8 (diff)
downloadperl-fad39ff13c300fe483c6155ea2883280e12fc89c.tar.gz
allow arrow omission in $foo[10]->('foo') etc. (but not in
foo()->()); rework grammar to remove conflicts Message-ID: <14232.54970.771570.548676@alias-2.pr.mcs.net> Subject: [PATCH _57, long] Re: optional arrow asymmetry p4raw-id: //depot/perl@3767
Diffstat (limited to 'vms/perly_h.vms')
-rw-r--r--vms/perly_h.vms3
1 files changed, 3 insertions, 0 deletions
diff --git a/vms/perly_h.vms b/vms/perly_h.vms
index ebeaaf735a..c750217d8f 100644
--- a/vms/perly_h.vms
+++ b/vms/perly_h.vms
@@ -1,4 +1,5 @@
/* Postprocessed by vms_yfix.pl 1.11 to add VMS declarations of globals */
+#ifdef PERL_CORE
#define WORD 257
#define METHOD 258
#define FUNCMETH 259
@@ -57,6 +58,8 @@
#define POSTINC 312
#define POSTDEC 313
#define ARROW 314
+#endif /* PERL_CORE */
+
typedef union {
I32 ival;
char *pval;