summaryrefslogtreecommitdiff
path: root/ext/Thread
diff options
context:
space:
mode:
authorMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-11-25 15:47:36 +0000
committerMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-11-25 15:47:36 +0000
commitdd4ea8b47491cf43b89a153ec2b48cb3ffade15b (patch)
tree628544d17ca2dfe05c64c7a6e31d2c80ff9a30f0 /ext/Thread
parent48bfcc53740a66ec5a66616b846e1db9955c1c69 (diff)
downloadperl-dd4ea8b47491cf43b89a153ec2b48cb3ffade15b.tar.gz
Fix typo in Thread.xs.
p4raw-id: //depot/perl@297
Diffstat (limited to 'ext/Thread')
-rw-r--r--ext/Thread/Thread.xs4
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/Thread/Thread.xs b/ext/Thread/Thread.xs
index 17c724ac9d..c0d551d612 100644
--- a/ext/Thread/Thread.xs
+++ b/ext/Thread/Thread.xs
@@ -128,12 +128,12 @@ threadstart(void *arg)
av_store(av, 0, &sv_no);
av_store(av, 1, newSVsv(thr->errsv));
DEBUG_L(PerlIO_printf(PerlIO_stderr(), "%p died: %s\n",
- SvPV(thr->errsv, na));
+ SvPV(thr->errsv, na)));
} else {
DEBUG_L(STMT_START {
for (i = 1; i <= retval; i++) {
PerlIO_printf(PerlIO_stderr(), "%p return[%d] = %s\n",
- thr, i, SvPEEK(sp[i - 1]));)
+ thr, i, SvPEEK(sp[i - 1]));
}
} STMT_END);
av_store(av, 0, &sv_yes);