| Subject: | t/02-Slot.t hangs on Linux |
$ make test TEST_VERBOSE=1
PERL_DL_NONLAZY=1 /home/c/perl5/perlbrew/perls/18.1i/bin/perl "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(1, 'blib/lib', 'blib/arch')" t/*.t
t/00-SlotWorker.t ..........
1..3
ok 1 - use Gearman::Server;
2014/03/22 13:42:28 gearmand STARTED #7411 port:9955
2014/03/22 13:42:29 filtered: TestWorker::slowreverse
2014/03/22 13:42:29 filtered: TestWorker::reverse
2014/03/22 13:42:29 register TestWorker::slowreverse
2014/03/22 13:42:29 register TestWorker::reverse
2014/03/22 13:42:29 [TestWorker::reverse] 'HELLO' workleft:-1
ok 2 - client result ok
ok 3 - ends successfully
2014/03/22 13:42:29 gearmand STOPPED #7411
ok
t/01-SlotWorkerOverwork.t ..
1..3
ok 1 - use Gearman::Server;
2014/03/22 13:42:32 [TestWorker::reverse] 'HELLO' workleft:3
2014/03/22 13:42:32 [TestWorker::reverse] 'HELLO' workleft:2
ok 2 - client result ok
ok 3 - client result ok
ok
t/02-Slot.t ................
1..3
ok 1 - use Gearman::Server;
2014/03/22 13:42:36 gearmand STARTED #7417 port:9955
2014/03/22 13:42:36 start /home/c/perl5/perlbrew/perls/18.1i/bin/perl -It/lib -I./lib -MTestWorker -e 'TestWorker -> Loop(job_servers=>["localhost:9955"],channel=>"child",workleft=>3,sbbaseurl=>"");'
2014/03/22 13:42:36 filtered: TestWorker::slowreverse
2014/03/22 13:42:36 filtered: TestWorker::reverse
2014/03/22 13:42:36 register TestWorker::slowreverse
2014/03/22 13:42:36 register TestWorker::reverse
ok 2
ok 3 - ends successfully
2014/03/22 13:42:38 stop called
2014/03/22 13:42:38 gearmand STOPPED #7417
(hangs)
If I tun test separately using "perl -Mblib", it does not hang.
--
Alexandr Ciornii, http://chorny.net