This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix warnings from win32 gcc compilers
authorSisyphus <sisyphus1@optusnet.com.au>
Mon, 9 Nov 2009 16:08:47 +0000 (11:08 -0500)
committerDavid Golden <dagolden@cpan.org>
Mon, 9 Nov 2009 16:08:47 +0000 (11:08 -0500)
win32/config_H.gc
win32/config_H.gc64
win32/config_H.gc64nox

index 823cb3e..9899822 100644 (file)
  */
 #if 42 == 1
 #define CAT2(a,b)      a/**/b
+#undef STRINGIFY
 #define STRINGIFY(a)   "a"
 #endif
 #if 42 == 42
 #define PeRl_StGiFy(a) #a
 #define CAT2(a,b)      PeRl_CaTiFy(a,b)
 #define StGiFy(a)      PeRl_StGiFy(a)
+#undef STRINGIFY
 #define STRINGIFY(a)   PeRl_StGiFy(a)
 #endif
 #if 42 != 1 && 42 != 42
index 1e57347..19f1eb7 100644 (file)
  */
 #if 42 == 1
 #define CAT2(a,b)      a/**/b
+#undef STRINGIFY
 #define STRINGIFY(a)   "a"
 #endif
 #if 42 == 42
 #define PeRl_StGiFy(a) #a
 #define CAT2(a,b)      PeRl_CaTiFy(a,b)
 #define StGiFy(a)      PeRl_StGiFy(a)
+#undef STRINGIFY
 #define STRINGIFY(a)   PeRl_StGiFy(a)
 #endif
 #if 42 != 1 && 42 != 42
index d34eb1c..62f9efa 100644 (file)
  */
 #if 42 == 1
 #define CAT2(a,b)      a/**/b
+#undef STRINGIFY
 #define STRINGIFY(a)   "a"
 #endif
 #if 42 == 42
 #define PeRl_StGiFy(a) #a
 #define CAT2(a,b)      PeRl_CaTiFy(a,b)
 #define StGiFy(a)      PeRl_StGiFy(a)
+#undef STRINGIFY
 #define STRINGIFY(a)   PeRl_StGiFy(a)
 #endif
 #if 42 != 1 && 42 != 42