summaryrefslogtreecommitdiff
path: root/doio.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2005-11-07 15:32:15 +0200
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-11-07 11:39:57 +0000
commitd0d72822ba0a68d160ea4c98ca80f24b8f73969b (patch)
tree735ce6a98b4d91d05a26f9573f8e62ca8f91738f /doio.c
parent7d0beb42a2610634ab455d4519a64df3ca90bc2f (diff)
downloadperl-d0d72822ba0a68d160ea4c98ca80f24b8f73969b.tar.gz
Symbian update blead@26025
Message-ID: <B356D8F434D20B40A8CEDAEC305A1F24E7A70C@esebe105.NOE.Nokia.com> p4raw-id: //depot/perl@26030
Diffstat (limited to 'doio.c')
-rw-r--r--doio.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/doio.c b/doio.c
index 5511b55b61..d1bc72c76c 100644
--- a/doio.c
+++ b/doio.c
@@ -1577,11 +1577,11 @@ Perl_apply(pTHX_ I32 type, register SV **mark, register SV **sp)
platforms where kill was not defined. */
#ifndef HAS_KILL
if (type == OP_KILL)
- DIE(aTHX_ PL_no_func, "kill");
+ Perl_die(aTHX_ PL_no_func, "kill");
#endif
#ifndef HAS_CHOWN
if (type == OP_CHOWN)
- DIE(aTHX_ PL_no_func, "chown");
+ Perl_die(aTHX_ PL_no_func, "chown");
#endif