RE: [PATCH] RE: PERL_CORE UVf logic

From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <2C2E01334A940D4792B3E115F95B7226C9D20A@exchsvr1.npl.ad.local>

p4raw-id: //depot/perl@32142

diff --git a/perl.h b/perl.h
index d753cdb..9822db0 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -3112,11 +3112,11 @@ typedef pthread_key_t   perl_key;
 
 #ifdef PERL_CORE
 /* not used; but needed for backward compatibilty with XS code? - RMB */ 
+#  undef UVf
+#else
 #  ifndef UVf
 #    define UVf UVuf
 #  endif
-#else
-#  undef UVf
 #endif
 
 #ifdef HASATTRIBUTE_FORMAT