diff options
| author | Robin Barker <RMBarker@cpan.org> | 2007-10-19 14:33:50 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-10-20 16:25:32 +0000 |
| commit | f46d31f29260b0c2f9512e111771e7be43966193 (patch) | |
| tree | 7a794a36bf96f16782dec4d0bcb8887296b42d85 /perl.h | |
| parent | 768195fccafdf76c2cb07de2ca1fea7b2bf8972e (diff) | |
| download | perl-f46d31f29260b0c2f9512e111771e7be43966193.tar.gz | |
VDf no longer in PERL_CORE
From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <2C2E01334A940D4792B3E115F95B7226C9D20E@exchsvr1.npl.ad.local>
p4raw-id: //depot/perl@32152
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 20 |
1 files changed, 7 insertions, 13 deletions
@@ -3072,12 +3072,9 @@ typedef pthread_key_t perl_key; These formats will still work in perl code. See comments in sv.c for futher details. - -DvdNUMBER=<number> can be used to redefine VDf - - -DvdNUMBER=0 reverts VDf to "vd", as in perl5.8.7, - which works properly but gives compiler warnings - Robin Barker 2005-07-14 + + No longer use %1p for VDf = %vd. RMB 2007-10-19 */ #ifndef SVf_ @@ -3098,14 +3095,11 @@ typedef pthread_key_t perl_key; #define SVfARG(p) ((void*)(p)) -#ifndef vdNUMBER -# define vdNUMBER 1 -#endif - -#ifndef VDf -# if vdNUMBER -# define VDf STRINGIFY(vdNUMBER) "p" -# else +#ifdef PERL_CORE +/* not used; but needed for backward compatibilty with XS code? - RMB */ +# undef VDf +#else +# ifndef VDf # define VDf "vd" # endif #endif |