This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Rename perl_thread to perl_os_thread.
[perl5.git] / ext / Thread / Thread.pm
CommitLineData
d9bb3666
MB
1package Thread;
2require Exporter;
3require DynaLoader;
4@ISA = qw(Exporter DynaLoader);
8f4f90ac 5@EXPORT_OK = qw(yield cond_signal cond_broadcast cond_wait async);
734689b1
MB
6
7#
8# Methods
9#
10
11#
12# Exported functions
13#
14sub async (&) {
15 return new Thread $_[0];
16}
d9bb3666 17
458fb581
MB
18sub eval {
19 return eval { shift->join; };
20}
21
d9bb3666
MB
22bootstrap Thread;
23
d9bb3666 241;