diff options
| author | Steve Peters <steve@fisharerojo.org> | 2006-10-04 18:45:37 +0000 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2006-10-04 18:45:37 +0000 |
| commit | 6d9c9890b6305b20fe39f3b418a5330f9fb32465 (patch) | |
| tree | 39ac6e45ce6940d6fb640067e8d8fa1eb9ee1451 | |
| parent | dab8accc950a57180c2a6414eeb663fee64b5567 (diff) | |
| download | perl-6d9c9890b6305b20fe39f3b418a5330f9fb32465.tar.gz | |
Fixes to compile Perl with g++ and DEBUGGING.
p4raw-id: //depot/perl@28934
| -rw-r--r-- | regcomp.pl | 4 | ||||
| -rw-r--r-- | regnodes.h | 4 | ||||
| -rw-r--r-- | x2p/a2p.c | 6 |
3 files changed, 9 insertions, 5 deletions
diff --git a/regcomp.pl b/regcomp.pl index 2884971115..ed270e8967 100644 --- a/regcomp.pl +++ b/regcomp.pl @@ -152,7 +152,7 @@ print OUT <<EOP; }; #ifdef DEBUGGING -const char * const reg_name[] = { +const char * reg_name[] = { EOP $ind = 0; @@ -170,7 +170,7 @@ print OUT <<EOP; #endif /* DEBUGGING */ #else #ifdef DEBUGGING -extern const char * const reg_name[]; +extern const char * reg_name[]; #endif #endif /* REG_COMP_C */ diff --git a/regnodes.h b/regnodes.h index 31286f9c84..01a53f99d4 100644 --- a/regnodes.h +++ b/regnodes.h @@ -347,7 +347,7 @@ static const char reg_off_by_arg[] = { }; #ifdef DEBUGGING -const char * const reg_name[] = { +const char * reg_name[] = { "END", /* 0000 */ "SUCCEED", /* 0x01 */ "BOL", /* 0x02 */ @@ -445,7 +445,7 @@ const char * const reg_name[] = { #endif /* DEBUGGING */ #else #ifdef DEBUGGING -extern const char * const reg_name[]; +extern const char * reg_name[]; #endif #endif /* REG_COMP_C */ @@ -2179,13 +2179,17 @@ int yyparse (void); #define YYREJECT goto yyabort #define YYACCEPT goto yyaccept #define YYERROR goto yyerrlab + +#if YYDEBUG +EXTERN_C char *getenv(const char *); +#endif + int yyparse(void) { register int yym, yyn, yystate; #if YYDEBUG register char *yys; - extern char *getenv(); if ((yys = getenv("YYDEBUG"))) { |