summaryrefslogtreecommitdiff
path: root/cop.h
diff options
context:
space:
mode:
authorLarry Wall <larry@netlabs.com>1993-10-10 00:00:00 +0000
committerLarry Wall <larry@netlabs.com>1993-10-10 00:00:00 +0000
commit93a17b20b6d176db3f04f51a63b0a781e5ffd11c (patch)
tree764149b1d480d5236d4d62b3228bd57f53a71042 /cop.h
parent79072805bf63abe5b5978b5928ab00d360ea3e7f (diff)
downloadperl-93a17b20b6d176db3f04f51a63b0a781e5ffd11c.tar.gz
perl 5.0 alpha 3
[editor's note: the sparc executables have not been included, and emacs backup files have been removed]
Diffstat (limited to 'cop.h')
-rw-r--r--cop.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/cop.h b/cop.h
index 9f07457f58..8e7a88d4f4 100644
--- a/cop.h
+++ b/cop.h
@@ -49,6 +49,7 @@ struct cop {
struct ccop ccop; /* compound command */
struct scop scop; /* switch command */
} uop;
+ U32 cop_seq; /* parse sequence number */
short cop_slen; /* len of cop_short, if not null */
VOL short cop_flags; /* optimization flags--see above */
HV * cop_stash; /* package line was compiled in */
@@ -70,6 +71,7 @@ struct block_sub {
GV * defgv;
AV * savearray;
AV * argarray;
+ AV * comppad;
U16 olddepth;
U8 hasargs;
};