diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-07-04 22:39:23 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-07-04 22:39:23 +0000 |
| commit | f6b3007c38a92f48d086a19ea8682dd935b6d4ee (patch) | |
| tree | 34b06be11b8bc4a8d3028149e890aac13fcfce33 /bytecode.pl | |
| parent | efeaa891beb26deace23d0f0d79d1dabb1e7e0a1 (diff) | |
| download | perl-f6b3007c38a92f48d086a19ea8682dd935b6d4ee.tar.gz | |
Integrate with mainperl.
p4raw-id: //depot/cfgperl@3576
Diffstat (limited to 'bytecode.pl')
| -rw-r--r-- | bytecode.pl | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/bytecode.pl b/bytecode.pl index e12acbb0a6..030d1eab52 100644 --- a/bytecode.pl +++ b/bytecode.pl @@ -232,20 +232,6 @@ for ($i = 0; $i < @optype - 1; $i++) { printf BYTERUN_H " OPt_%s,\t\t/* %d */\n", $optype[$i], $i; } printf BYTERUN_H " OPt_%s\t\t/* %d */\n};\n\n", $optype[$i], $i; -print BYTERUN_H <<'EOT'; -EXT int PL_optype_size[] -#ifdef DOINIT -= { -EOT -for ($i = 0; $i < @optype - 1; $i++) { - printf BYTERUN_H " sizeof(%s),\n", $optype[$i], $i; -} -printf BYTERUN_H " sizeof(%s)\n}\n", $optype[$i], $i; -print BYTERUN_H <<'EOT'; -#endif /* DOINIT */ -; - -EOT print BYTERUN_H <<'EOT'; EXT void byterun(pTHXo_ struct bytestream bs); |