Change 17251 by jhi@alpha on 2002/06/15 15:39:09
Spurious empty statements.
Affected files ...
.... //depot/perl/op.c#503 edit
.... //depot/perl/perl.c#442 edit
.... //depot/perl/perlio.c#180 edit
.... //depot/perl/sv.c#561 edit
Differences ...
==== //depot/perl/op.c#503 (text) ====
Index: perl/op.c
--- perl/op.c#502~16656~ Fri May 17 09:52:15 2002
+++ perl/op.c Sat Jun 15 08:39:09 2002
@@ -3423,7 +3423,7 @@
pack = newSVOP(OP_CONST, 0, newSVsv(((SVOP*)id)->op_sv));
/* Fake up a method call to import/unimport */
- meth = aver ? newSVpvn("import",6) : newSVpvn("unimport", 8);;
+ meth = aver ? newSVpvn("import",6) : newSVpvn("unimport", 8);
(void)SvUPGRADE(meth, SVt_PVIV);
(void)SvIOK_on(meth);
PERL_HASH(SvUVX(meth), SvPVX(meth), SvCUR(meth));
==== //depot/perl/perl.c#442 (text) ====
Index: perl/perl.c
--- perl/perl.c#441~17250~ Sat Jun 15 08:34:51 2002
+++ perl/perl.c Sat Jun 15 08:39:09 2002
@@ -435,7 +435,7 @@
if (CALL_FPTR(PL_threadhook)(aTHX)) {
/* Threads hook has vetoed further cleanup */
- return STATUS_NATIVE_EXPORT;;
+ return STATUS_NATIVE_EXPORT;
}
/* We must account for everything. */
@@ -491,7 +491,7 @@
#endif
/* The exit() function will do everything that needs doing. */
- return STATUS_NATIVE_EXPORT;;
+ return STATUS_NATIVE_EXPORT;
}
/* jettison our possibly duplicated environment */
==== //depot/perl/perlio.c#180 (text) ====
Index: perl/perlio.c
--- perl/perlio.c#179~17172~ Mon Jun 10 12:27:23 2002
+++ perl/perlio.c Sat Jun 15 08:39:09 2002
@@ -632,7 +632,7 @@
if ((*l->tab->Popped) (aTHX_ f) != 0)
return;
}
- *f = l->next;;
+ *f = l->next;
Safefree(l);
}
}
==== //depot/perl/sv.c#561 (text) ====
Index: perl/sv.c
--- perl/sv.c#560~17164~ Mon Jun 10 06:01:17 2002
+++ perl/sv.c Sat Jun 15 08:39:09 2002
@@ -9342,7 +9342,7 @@
case CXt_EVAL:
ncx->blk_eval.old_in_eval = cx->blk_eval.old_in_eval;
ncx->blk_eval.old_op_type = cx->blk_eval.old_op_type;
- ncx->blk_eval.old_namesv = sv_dup_inc(cx->blk_eval.old_namesv, param);;
+ ncx->blk_eval.old_namesv = sv_dup_inc(cx->blk_eval.old_namesv, param);
ncx->blk_eval.old_eval_root = cx->blk_eval.old_eval_root;
ncx->blk_eval.cur_text = sv_dup(cx->blk_eval.cur_text, param);
break;
End of Patch.
