summaryrefslogtreecommitdiff
path: root/doio.c
diff options
context:
space:
mode:
authorSteve Hay <steve.m.hay@googlemail.com>2012-06-26 20:52:25 +0100
committerSteve Hay <steve.m.hay@googlemail.com>2012-06-26 20:52:25 +0100
commit885b4b39ea6a6ada4a5e7ecc4a47d4c4abdb64ab (patch)
tree10951f6a86152780fa3a96c81eab9b77e1a499ad /doio.c
parentcce9fd8c3af65a185d1dd1086d752af3529c8b8d (diff)
downloadperl-885b4b39ea6a6ada4a5e7ecc4a47d4c4abdb64ab.tar.gz
Remove C++isms from doio.c
(Introduced by c2fd40cb02 and not tolerated by VC++ compiling a C file.)
Diffstat (limited to 'doio.c')
-rw-r--r--doio.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/doio.c b/doio.c
index 6890d12537..8149172eab 100644
--- a/doio.c
+++ b/doio.c
@@ -1579,7 +1579,7 @@ Perl_apply(pTHX_ I32 type, register SV **mark, register SV **sp)
const char *s;
STRLEN len;
SV ** const oldmark = mark;
- bool killgp = false;
+ bool killgp = FALSE;
PERL_ARGS_ASSERT_APPLY;
@@ -1694,7 +1694,7 @@ nothing in the core.
{
s++;
len--;
- killgp = true;
+ killgp = TRUE;
}
if (isALPHA(*s)) {
if (*s == 'S' && s[1] == 'I' && s[2] == 'G') {
@@ -1709,7 +1709,7 @@ nothing in the core.
val = SvIV(*mark);
if (val < 0)
{
- killgp = true;
+ killgp = TRUE;
val = -val;
}
}