projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
warn on C<my($foo,$foo)>
[p5sagit/p5-mst-13.2.git]
/
thread.h
diff --git
a/thread.h
b/thread.h
index
0f350ed
..
3eb061a
100644
(file)
--- a/
thread.h
+++ b/
thread.h
@@
-194,7
+194,7
@@
struct perl_thread *getTHR _((void));
#define ThrSETSTATE(t, s) STMT_START { \
(t)->flags &= ~THRf_STATE_MASK; \
(t)->flags |= (s); \
- DEBUG_L(PerlIO_printf(PerlIO_stderr(), \
+ DEBUG_S(PerlIO_printf(PerlIO_stderr(), \
"thread %p set to state %d\n", (t), (s))); \
} STMT_END