summaryrefslogtreecommitdiff
path: root/x2p
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-05-30 23:12:30 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-05-30 23:12:30 +0000
commitb7953727b0415d171133ea7caa7aca5672129f99 (patch)
tree04eeafc77fc5ed0662e0e330e4960ab6b6402acc /x2p
parent659ca9ea8f57ee52a52802839584b7208ad161b7 (diff)
downloadperl-b7953727b0415d171133ea7caa7aca5672129f99.tar.gz
More -Wall silencing from Michael Schwern and Jarkko Hietaniemi.
p4raw-id: //depot/perl@10335
Diffstat (limited to 'x2p')
-rw-r--r--x2p/a2py.c6
-rw-r--r--x2p/str.c2
-rw-r--r--x2p/walk.c6
3 files changed, 7 insertions, 7 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;
diff --git a/x2p/str.c b/x2p/str.c
index 310bcd6e3b..0587205270 100644
--- a/x2p/str.c
+++ b/x2p/str.c
@@ -221,7 +221,7 @@ str_replace(register STR *str, register STR *nstr)
str->str_len = nstr->str_len;
str->str_cur = nstr->str_cur;
str->str_pok = nstr->str_pok;
- if (str->str_nok = nstr->str_nok)
+ if ((str->str_nok = nstr->str_nok))
str->str_nval = nstr->str_nval;
safefree((char*)nstr);
}
diff --git a/x2p/walk.c b/x2p/walk.c
index 59ac8a9f3d..10546db197 100644
--- a/x2p/walk.c
+++ b/x2p/walk.c
@@ -52,7 +52,7 @@ walk(int useval, int level, register int node, int *numericptr, int minprec)
STR *tmp2str;
STR *tmp3str;
char *t;
- char *d, *s;
+ char *d, *s = 0;
int numarg;
int numeric = FALSE;
STR *fstr;
@@ -750,7 +750,7 @@ sub Pick {\n\
subretnum |= numarg;
s = Nullch;
t = tmp2str->str_ptr;
- while (t = instr(t,"return "))
+ while ((t = instr(t,"return ")))
s = t++;
if (s) {
i = 0;
@@ -1463,7 +1463,7 @@ sub Pick {\n\
if (!s)
fatal("Illegal for loop: %s",d);
*s++ = '\0';
- for (t = s; i = *t; t++) {
+ for (t = s; (i = *t); t++) {
i &= 127;
if (i == '}' || i == ']')
break;