From: Gurusamy Sarathy <gsar@cpan.org>
Date: Mon, 28 Jun 1999 18:50:52 +0000 (+0000)
Subject: remove bogus PL_optype_size
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e8f6cf2cf745c04ba44ab77a506f5433ffa502e9;p=p5sagit%2Fp5-mst-13.2.git

remove bogus PL_optype_size

p4raw-id: //depot/perl@3560
---

diff --git a/bytecode.pl b/bytecode.pl
index e12acbb..030d1ea 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);
diff --git a/ext/ByteLoader/byterun.h b/ext/ByteLoader/byterun.h
index 3a0381f..6bc03af 100644
--- a/ext/ByteLoader/byterun.h
+++ b/ext/ByteLoader/byterun.h
@@ -154,25 +154,6 @@ enum {
     OPt_COP		/* 11 */
 };
 
-EXT int PL_optype_size[]
-#ifdef DOINIT
-= {
-    sizeof(OP),
-    sizeof(UNOP),
-    sizeof(BINOP),
-    sizeof(LOGOP),
-    sizeof(CONDOP),
-    sizeof(LISTOP),
-    sizeof(PMOP),
-    sizeof(SVOP),
-    sizeof(GVOP),
-    sizeof(PVOP),
-    sizeof(LOOP),
-    sizeof(COP)
-}
-#endif /* DOINIT */
-;
-
 EXT void byterun(pTHXo_ struct bytestream bs);
 
 #define INIT_SPECIALSV_LIST STMT_START { \