summaryrefslogtreecommitdiff
path: root/opcode.pl
diff options
context:
space:
mode:
Diffstat (limited to 'opcode.pl')
-rwxr-xr-xopcode.pl9
1 files changed, 9 insertions, 0 deletions
diff --git a/opcode.pl b/opcode.pl
index 98e18da93b..1afc2f6cf3 100755
--- a/opcode.pl
+++ b/opcode.pl
@@ -46,6 +46,9 @@ print "\n#define MAXO ", scalar @ops, "\n\n";
# Emit op names and descriptions.
print <<END;
+
+START_EXTERN_C
+
#ifndef DOINIT
EXT char *PL_op_name[];
#else
@@ -77,6 +80,8 @@ print <<END;
};
#endif
+END_EXTERN_C
+
#ifndef PERL_OBJECT
START_EXTERN_C
@@ -108,6 +113,8 @@ print <<END;
END_EXTERN_C
#endif /* PERL_OBJECT */
+START_EXTERN_C
+
#ifndef DOINIT
EXT OP * (CPERLscope(*PL_ppaddr)[])(pTHX);
#else
@@ -208,6 +215,8 @@ for (@ops) {
print <<END;
};
#endif
+
+END_EXTERN_C
END
close OC or die "Error closing opcode.h: $!";