Change 13671 by jhi@alpha on 2001/12/13 13:35:47
"preprocessing directive not recognized within macro arg"
Affected files ...
.... //depot/perl/ext/Data/Dumper/Dumper.xs#31 edit
Differences ...
==== //depot/perl/ext/Data/Dumper/Dumper.xs#31 (text) ====
Index: perl/ext/Data/Dumper/Dumper.xs
--- perl/ext/Data/Dumper/Dumper.xs.~1~ Thu Dec 13 06:45:06 2001
+++ perl/ext/Data/Dumper/Dumper.xs Thu Dec 13 06:45:06 2001
@@ -508,12 +508,14 @@
SvREFCNT_inc(sv);
av_push(keys, sv);
}
+#ifdef USE_LOCALE_NUMERIC
sortsv(AvARRAY(keys),
av_len(keys)+1,
-#ifdef USE_LOCALE_NUMERIC
IN_LOCALE ? Perl_sv_cmp_locale : Perl_sv_cmp);
#else
- Perl_sv_cmp);
+ sortsv(AvARRAY(keys),
+ av_len(keys)+1,
+ Perl_sv_cmp);
#endif
}
else {
End of Patch.