From: Jarkko Hietaniemi Date: Wed, 17 Oct 2001 16:46:50 +0000 (+0000) Subject: (retracted by #12485) X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=36304a5b1f0a2c119c203d5ca7cc1ccae4267837;p=p5sagit%2Fp5-mst-13.2.git (retracted by #12485) Unterminated #ifdef. p4raw-id: //depot/perl@12476 --- diff --git a/mg.c b/mg.c index 7953d76..28acb57 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);