summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-10-17 16:46:50 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-10-17 16:46:50 +0000
commit36304a5b1f0a2c119c203d5ca7cc1ccae4267837 (patch)
tree103c671ba328f66266cf466bf6bead5a52999f55 /mg.c
parenta385c4e7bdc7cbc9f50e4f013b7a373e7450e199 (diff)
downloadperl-36304a5b1f0a2c119c203d5ca7cc1ccae4267837.tar.gz
(retracted by #12485)
Unterminated #ifdef. p4raw-id: //depot/perl@12476
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/mg.c b/mg.c
index 7953d761c2..28acb57adf 100644
--- a/mg.c
+++ b/mg.c
@@ -1968,7 +1968,9 @@ Perl_magic_set(pTHX_ SV *sv, MAGIC *mg)
#ifdef VMS
(SvIV(sv) == EVMSERR) ? 4 : vaxc$errno
#else
- 0);
+ 0
+#endif
+ );
break;
case '<':
PL_uid = SvIOK(sv) ? SvIVX(sv) : sv_2iv(sv);