diff options
author | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1997-09-03 12:31:48 +0000 |
---|---|---|
committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1997-09-03 12:31:48 +0000 |
commit | ed65db6c6bc1b1e4dbabdf2bae93837e52fa7473 (patch) | |
tree | d9fede651fede49352ccbcf0cf92789a6478c78f /byterun.c | |
parent | 1b95b982db38b55c080b1a1a3872fba1ac114acc (diff) | |
download | perl-ed65db6c6bc1b1e4dbabdf2bae93837e52fa7473.tar.gz |
Make compiler build/work with devel 5.005
p4raw-id: //depot/perlext/Compiler@50
Diffstat (limited to 'byterun.c')
-rw-r--r-- | byterun.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -1,5 +1,5 @@ /* - * Copyright (c) 1996 Malcolm Beattie + * Copyright (c) 1996, 1997 Malcolm Beattie * * You may distribute under the terms of either the GNU General Public * License or the Artistic License, as specified in the README file. @@ -22,6 +22,7 @@ void byterun(fp) FILE *fp; #endif /* INDIRECT_BGET_MACROS */ { + dTHR; int insn; while ((insn = FGETC()) != EOF) { switch (insn) { |