summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-05-18 07:51:19 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-05-18 07:51:19 +0000
commitd2719217c9b7910115cef7ea0c16d68e6b286cf7 (patch)
tree8b388dce5c146bf58433ed543f610f8361103d80 /pp_sys.c
parent3c78fafa1650432985234f9821e053d8f64c6224 (diff)
downloadperl-d2719217c9b7910115cef7ea0c16d68e6b286cf7.tar.gz
[win32] more whitespace tweaks from maintbranch
p4raw-id: //depot/win32/perl@1009
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/pp_sys.c b/pp_sys.c
index d00d162c86..fee474fac2 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 */
-