diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-15 15:39:09 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-15 15:39:09 +0000 |
commit | b47cad0843cec3c59de073dc0b722c525c4e1720 (patch) | |
tree | f2038030e731b87beaee2fae0ac9bf7f4a7f31ce | |
parent | 47c8db80932508b6333745f2c283d5a98bf9cccb (diff) | |
download | perl-b47cad0843cec3c59de073dc0b722c525c4e1720.tar.gz |
Spurious empty statements.
p4raw-id: //depot/perl@17251
-rw-r--r-- | op.c | 2 | ||||
-rw-r--r-- | perl.c | 4 | ||||
-rw-r--r-- | perlio.c | 2 | ||||
-rw-r--r-- | sv.c | 2 |
4 files changed, 5 insertions, 5 deletions
@@ -3423,7 +3423,7 @@ Perl_utilize(pTHX_ int aver, I32 floor, OP *version, OP *id, OP *arg) 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)); @@ -435,7 +435,7 @@ perl_destruct(pTHXx) 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 @@ perl_destruct(pTHXx) #endif /* The exit() function will do everything that needs doing. */ - return STATUS_NATIVE_EXPORT;; + return STATUS_NATIVE_EXPORT; } /* jettison our possibly duplicated environment */ @@ -632,7 +632,7 @@ PerlIO_pop(pTHX_ PerlIO *f) if ((*l->tab->Popped) (aTHX_ f) != 0) return; } - *f = l->next;; + *f = l->next; Safefree(l); } } @@ -9342,7 +9342,7 @@ Perl_cx_dup(pTHX_ PERL_CONTEXT *cxs, I32 ix, I32 max, CLONE_PARAMS* param) 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; |