diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-06-12 06:43:03 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-06-12 06:43:03 +0000 |
commit | 73c4f7a1d0b3ac27682d86c953e22cbc7dc810e6 (patch) | |
tree | d12e2ac03334a26b273c7b91e41aba6df9cfc33f /opcode.pl | |
parent | 22b491d3a115964a8dde699347569bf3176f8b1a (diff) | |
download | perl-73c4f7a1d0b3ac27682d86c953e22cbc7dc810e6.tar.gz |
EXTERN_C declarations for global arrays in various
headers, so perl can be built even in C++ mode; win32
build fixups; regen headers
p4raw-id: //depot/perl@3537
Diffstat (limited to 'opcode.pl')
-rwxr-xr-x | opcode.pl | 9 |
1 files changed, 9 insertions, 0 deletions
@@ -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: $!"; |