ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Coro/t/07_eval.t
(Generate patch)

Comparing Coro/t/07_eval.t (file contents):
Revision 1.1 by root, Tue Aug 14 14:56:22 2001 UTC vs.
Revision 1.2 by root, Fri Jan 4 02:42:10 2002 UTC

12 12
13async { 13async {
14 my $t = eval "3"; 14 my $t = eval "3";
15 print "ok $t\n"; 15 print "ok $t\n";
16 cede; 16 cede;
17 print defined eval "require Coro::Nonexistent" ? "not ok" : "ok", " 5\n"; 17 print defined eval "die" ? "not ok" : "ok", " 5\n";
18}; 18};
19 19
20print "ok 1\n"; 20print "ok 1\n";
21cede; 21cede;
22cede; 22cede;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines