From: Gurusamy Sarathy Date: Mon, 18 May 1998 07:51:19 +0000 (+0000) Subject: [win32] more whitespace tweaks from maintbranch X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d2719217c9b7910115cef7ea0c16d68e6b286cf7;p=p5sagit%2Fp5-mst-13.2.git [win32] more whitespace tweaks from maintbranch p4raw-id: //depot/win32/perl@1009 --- diff --git a/av.c b/av.c index b4621f3..02be7cc 100644 --- a/av.c +++ b/av.c @@ -369,7 +369,6 @@ av_undef(register AV *av) SvREFCNT_dec(AvARRAY(av)[--key]); } Safefree(AvALLOC(av)); - SvPVX(av) = 0; AvALLOC(av) = 0; SvPVX(av) = 0; AvMAX(av) = AvFILLp(av) = -1; @@ -479,7 +478,7 @@ av_unshift(register AV *av, register I32 num) AvFILLp(av) += i; SvPVX(av) = (char*)(AvARRAY(av) - i); } - if (num) { + if (num) { i = AvFILLp(av); av_extend(av, i + num); AvFILLp(av) += num; diff --git a/perl.c b/perl.c index e2856f8..e02786e 100644 --- a/perl.c +++ b/perl.c @@ -2676,7 +2676,7 @@ call_list(I32 oldscope, AV *list) dJMPENV; int ret; - while (AvFILL(list) >= 0) { + while (AvFILL(list) >= 0) { CV *cv = (CV*)av_shift(list); SAVEFREESV(cv); @@ -2814,6 +2814,3 @@ my_exit_jump(void) JMPENV_JUMP(2); } - - - diff --git a/pp_ctl.c b/pp_ctl.c index ede74b5..61e940f 100644 --- a/pp_ctl.c +++ b/pp_ctl.c @@ -915,14 +915,16 @@ block_gimme(void) return G_VOID; switch (cxstack[cxix].blk_gimme) { + case G_VOID: + return G_VOID; case G_SCALAR: return G_SCALAR; case G_ARRAY: return G_ARRAY; default: croak("panic: bad gimme: %d\n", cxstack[cxix].blk_gimme); - case G_VOID: - return G_VOID; + /* NOTREACHED */ + return 0; } } diff --git a/pp_sys.c b/pp_sys.c index d00d162..fee474f 100644 --- a/pp_sys.c +++ b/pp_sys.c @@ -581,7 +581,8 @@ PP(pp_untie) { djSP; SV * sv ; - sv = POPs; + + sv = POPs; if (dowarn) { MAGIC * mg ; @@ -4152,7 +4153,7 @@ PP(pp_gpwent) sv_setpv(sv, pwent->pw_gecos); #endif #ifndef INCOMPLETE_TAINTS - /* pw_gecos is tainted. */ + /* pw_gecos is tainted because user himself can diddle with it. */ SvTAINTED_on(sv); #endif @@ -4303,7 +4304,7 @@ PP(pp_getlogin) PP(pp_syscall) { -#ifdef HAS_SYSCALL +#ifdef HAS_SYSCALL djSP; dMARK; dORIGMARK; dTARGET; register I32 items = SP - MARK; unsigned long a[20]; @@ -4517,4 +4518,3 @@ int operation; } #endif /* LOCKF_EMULATE_FLOCK */ - diff --git a/toke.c b/toke.c index 4a21941..02f8cb9 100644 --- a/toke.c +++ b/toke.c @@ -189,7 +189,7 @@ missingterm(char *s) char q; if (s) { char *nl = strrchr(s,'\n'); - if (nl) + if (nl) *nl = '\0'; } else if (multi_close < 32 || multi_close == 127) { @@ -5086,7 +5086,7 @@ scan_heredoc(register char *s) } sv_setpvn(tmpstr,d+1,s-d); s += len - 1; - curcop->cop_line++; /* the preceding stmt passes a newline */ + curcop->cop_line++; /* the preceding stmt passes a newline */ sv_catpvn(herewas,s,bufend-s); sv_setsv(linestr,herewas);