diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-30 23:12:30 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-30 23:12:30 +0000 |
| commit | b7953727b0415d171133ea7caa7aca5672129f99 (patch) | |
| tree | 04eeafc77fc5ed0662e0e330e4960ab6b6402acc /x2p/a2py.c | |
| parent | 659ca9ea8f57ee52a52802839584b7208ad161b7 (diff) | |
| download | perl-b7953727b0415d171133ea7caa7aca5672129f99.tar.gz | |
More -Wall silencing from Michael Schwern and Jarkko Hietaniemi.
p4raw-id: //depot/perl@10335
Diffstat (limited to 'x2p/a2py.c')
| -rw-r--r-- | x2p/a2py.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/x2p/a2py.c b/x2p/a2py.c index 3976c860c5..5642b3673b 100644 --- a/x2p/a2py.c +++ b/x2p/a2py.c @@ -61,7 +61,6 @@ main(register int argc, register char **argv, register char **env) for (argc--,argv++; argc; argc--,argv++) { if (argv[0][0] != '-' || !argv[0][1]) break; - reswitch: switch (argv[0][1]) { #ifdef DEBUGGING case 'D': @@ -212,11 +211,12 @@ yylex(void) retry: #if YYDEBUG - if (yydebug) + if (yydebug) { if (strchr(s,'\n')) fprintf(stderr,"Tokener at %s",s); else fprintf(stderr,"Tokener at %s\n",s); + } #endif switch (*s) { default: @@ -1226,7 +1226,7 @@ fixfargs(int name, int arg, int prevargs) { int type; STR *str; - int numargs; + int numargs = 0; if (!arg) return prevargs; |