Hmm, more bugs:
sub stopbusywaiting {
Stem::Event::stop_loop;
}
my $stopper = new Stem::Event::Timer
object => $dummy,
method => "stopbusywaiting",
delay => 0.05,
interval => 0.05; # bug workaround
warn "a\n";
$stopper->start;
Stem::Event::start_loop;
$stopper->cancel;
warn "b\n";
This always takes a second, here is an strace:
http://ue.tst.eu/57e55320bf26d8c4ae403e722bd7e268.txt
adding "use Time::HiRes 'time'" to Perl.pm makes it run fast (yes,
diretcly below the code that should handle this, something is broken
witht he time::hires loading code apparently, maybe its this weird
core-overwriting issue).
--
The choice of a Deliantra, the free code+content MORPG
-----==- _GNU_ http://www.deliantra.net
----==-- _ generation
---==---(_)__ __ ____ __ Marc Lehmann
--==---/ / _ \/ // /\ \/ / pcg@goof.com
-=====/_/_//_/\_,_/ /_/\_\
Thread Previous
|
Thread Next