summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
authorAndy Lester <andy@petdance.com>2005-12-27 08:39:39 -0600
committerSteve Peters <steve@fisharerojo.org>2005-12-27 22:07:44 +0000
commitfabdb6c0879db76333e970b6c67260c877fc17b3 (patch)
tree81d106dc99b2069f6968bbe00164e6bb222dc482 /util.c
parentf319e147b252268cc6fe404c58538ec32cf8548a (diff)
downloadperl-fabdb6c0879db76333e970b6c67260c877fc17b3.tar.gz
pre-likely cleanup
Message-ID: <20051227203939.GC1781@petdance.com> Includes a small fix to the changes in tryAMAGICbinW_var() in pp.h. p4raw-id: //depot/perl@26505
Diffstat (limited to 'util.c')
-rw-r--r--util.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/util.c b/util.c
index 5263dd45c4..a88d988b9a 100644
--- a/util.c
+++ b/util.c
@@ -1021,12 +1021,12 @@ S_closest_cop(pTHX_ COP *cop, const OP *o)
{
/* Look for PL_op starting from o. cop is the last COP we've seen. */
- if (!o || o == PL_op) return cop;
+ if (!o || o == PL_op)
+ return cop;
if (o->op_flags & OPf_KIDS) {
OP *kid;
- for (kid = cUNOPo->op_first; kid; kid = kid->op_sibling)
- {
+ for (kid = cUNOPo->op_first; kid; kid = kid->op_sibling) {
COP *new_cop;
/* If the OP_NEXTSTATE has been optimised away we can still use it
@@ -1038,7 +1038,8 @@ S_closest_cop(pTHX_ COP *cop, const OP *o)
/* Keep searching, and return when we've found something. */
new_cop = closest_cop(cop, kid);
- if (new_cop) return new_cop;
+ if (new_cop)
+ return new_cop;
}
}
@@ -2585,8 +2586,7 @@ Perl_rsignal(pTHX_ int signo, Sighandler_t handler)
return PerlProc_signal(signo, handler);
}
-static
-Signal_t
+static Signal_t
sig_trap(int signo)
{
dVAR;