diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-04-09 02:13:04 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-04-09 02:13:04 +0000 |
| commit | 948a8a50b3fb40ab50e2ecb64a39deb2fdc5bfe0 (patch) | |
| tree | 92c5d0baa66cb8e2c3afdec0133de7fcf63ef53f /ext/Thread/Thread.xs | |
| parent | 95e35ab6821d31c565293fe01da39a7dfe1e0662 (diff) | |
| download | perl-948a8a50b3fb40ab50e2ecb64a39deb2fdc5bfe0.tar.gz | |
Integrate change #9646 from maintperl into mainline.
add note about ithreads and Thread.pm
p4raw-link: @9646 on //depot/maint-5.6/perl: 17a9312cad5ed64ba042d3290b6b96c0c0cf8f59
p4raw-id: //depot/perl@9648
p4raw-integrated: from //depot/maint-5.6/perl@9647 'merge in'
ext/Thread/Thread.pm (@7247..) ext/Thread/Thread.xs (@9547..)
Diffstat (limited to 'ext/Thread/Thread.xs')
| -rw-r--r-- | ext/Thread/Thread.xs | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/ext/Thread/Thread.xs b/ext/Thread/Thread.xs index f87e7c4a31..cb2e395051 100644 --- a/ext/Thread/Thread.xs +++ b/ext/Thread/Thread.xs @@ -322,7 +322,13 @@ newthread (pTHX_ SV *startsv, AV *initargs, char *classname) return sv; #else - croak("No threads in this perl"); +# ifdef USE_ITHREADS + croak("This perl was built for \"ithreads\", which currently does not support Thread.pm.\n" + "Run \"perldoc Thread\" for more information"); +# else + croak("This perl was not built with support for 5.005-style threads.\n" + "Run \"perldoc Thread\" for more information"); +# endif return &PL_sv_undef; #endif } |