summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2015-01-21 12:16:21 +0000
committerDavid Mitchell <davem@iabyn.com>2015-01-21 12:42:34 +0000
commit7b52d6569c115e4522e1cbe14cfd730e60c84bf1 (patch)
treeadf749373ce41b8f5e7d28ffd31e161842f052a6 /pp_sys.c
parentfa14274eb6699a6eabc280d644e7bdeaee02e336 (diff)
downloadperl-7b52d6569c115e4522e1cbe14cfd730e60c84bf1.tar.gz
avoid C labels in column 0
Generally the guideline is to outdent C labels (e.g. 'foo:') 2 columns from the surrounding code. If the label starts at column zero, then it means that diffs, such as those generated by git, display the label rather than the function name at the head of a diff block: which makes diffs harder to peruse.
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c32
1 files changed, 16 insertions, 16 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 5f00bbee53..e2f8edf9de 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -717,7 +717,7 @@ PP(pp_pipe_op)
#endif
RETPUSHYES;
-badexit:
+ badexit:
RETPUSHUNDEF;
#else
DIE(aTHX_ PL_no_func, "pipe");
@@ -2555,7 +2555,7 @@ PP(pp_bind)
else
RETPUSHUNDEF;
-nuts:
+ nuts:
report_evil_fh(gv);
SETERRNO(EBADF,SS_IVCHAN);
RETPUSHUNDEF;
@@ -2576,7 +2576,7 @@ PP(pp_listen)
else
RETPUSHUNDEF;
-nuts:
+ nuts:
report_evil_fh(gv);
SETERRNO(EBADF,SS_IVCHAN);
RETPUSHUNDEF;
@@ -2638,11 +2638,11 @@ PP(pp_accept)
PUSHp(namebuf, len);
RETURN;
-nuts:
+ nuts:
report_evil_fh(ggv);
SETERRNO(EBADF,SS_IVCHAN);
-badexit:
+ badexit:
RETPUSHUNDEF;
}
@@ -2660,7 +2660,7 @@ PP(pp_shutdown)
PUSHi( PerlSock_shutdown(PerlIO_fileno(IoIFP(io)), how) >= 0 );
RETURN;
-nuts:
+ nuts:
report_evil_fh(gv);
SETERRNO(EBADF,SS_IVCHAN);
RETPUSHUNDEF;
@@ -2740,10 +2740,10 @@ PP(pp_ssockopt)
}
RETURN;
-nuts:
+ nuts:
report_evil_fh(gv);
SETERRNO(EBADF,SS_IVCHAN);
-nuts2:
+ nuts2:
RETPUSHUNDEF;
}
@@ -2804,10 +2804,10 @@ PP(pp_getpeername)
PUSHs(sv);
RETURN;
-nuts:
+ nuts:
report_evil_fh(gv);
SETERRNO(EBADF,SS_IVCHAN);
-nuts2:
+ nuts2:
RETPUSHUNDEF;
}
@@ -3945,7 +3945,7 @@ PP(pp_open_dir)
goto nope;
RETPUSHYES;
-nope:
+ nope:
if (!errno)
SETERRNO(EBADF,RMS_DIR);
RETPUSHUNDEF;
@@ -3996,7 +3996,7 @@ PP(pp_readdir)
RETURN;
-nope:
+ nope:
if (!errno)
SETERRNO(EBADF,RMS_ISI);
if (gimme == G_ARRAY)
@@ -4029,7 +4029,7 @@ PP(pp_telldir)
PUSHi( PerlDir_tell(IoDIRP(io)) );
RETURN;
-nope:
+ nope:
if (!errno)
SETERRNO(EBADF,RMS_ISI);
RETPUSHUNDEF;
@@ -4055,7 +4055,7 @@ PP(pp_seekdir)
(void)PerlDir_seek(IoDIRP(io), along);
RETPUSHYES;
-nope:
+ nope:
if (!errno)
SETERRNO(EBADF,RMS_ISI);
RETPUSHUNDEF;
@@ -4079,7 +4079,7 @@ PP(pp_rewinddir)
}
(void)PerlDir_rewind(IoDIRP(io));
RETPUSHYES;
-nope:
+ nope:
if (!errno)
SETERRNO(EBADF,RMS_ISI);
RETPUSHUNDEF;
@@ -4112,7 +4112,7 @@ PP(pp_closedir)
IoDIRP(io) = 0;
RETPUSHYES;
-nope:
+ nope:
if (!errno)
SETERRNO(EBADF,RMS_IFI);
RETPUSHUNDEF;