Change 34418: Add new test file to MANIFEST. Fix tests for threaded builds.

[H . Merijn Brand]

Change 34418 by [EMAIL PROTECTED] on 2008/09/25 13:46:24

        Add new test file to MANIFEST. Fix tests for threaded builds.

Affected files ...

... //depot/perl/MANIFEST#1724 edit
... //depot/perl/ext/XS/APItest/APItest.xs#46 edit

Differences ...

==== //depot/perl/MANIFEST#1724 (text) ====
Index: perl/MANIFEST
--- perl/MANIFEST#1723~34364~   2008-09-15 03:56:23.000000000 -0700
+++ perl/MANIFEST       2008-09-25 06:46:24.000000000 -0700
@@ -1442,6 +1442,7 @@
 ext/XS/APItest/t/printf.t      XS::APItest extension
 ext/XS/APItest/t/push.t                XS::APItest extension
 ext/XS/APItest/t/rmagical.t    XS::APItest extension
+ext/XS/APItest/t/svpeek.t      XS::APItest extension
 ext/XS/APItest/t/svsetsv.t     Test behaviour of sv_setsv with/without 
PERL_CORE
 ext/XS/APItest/t/xs_special_subs_require.t     for require too
 ext/XS/APItest/t/xs_special_subs.t     Test that XS BEGIN/CHECK/INIT/END work

==== //depot/perl/ext/XS/APItest/APItest.xs#46 (text) ====
Index: perl/ext/XS/APItest/APItest.xs
--- perl/ext/XS/APItest/APItest.xs#45~34417~    2008-09-25 05:54:16.000000000 
-0700
+++ perl/ext/XS/APItest/APItest.xs      2008-09-25 06:46:24.000000000 -0700
@@ -856,7 +856,7 @@
     SV   *sv
 
   PPCODE:
-    ST (0) = newSVpv (Perl_sv_peek (sv), 0);
+    ST (0) = newSVpv (Perl_sv_peek (aTHX_ sv), 0);
     XSRETURN (1);
 
 void
End of Patch.