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.

Reply via email to