develooper Front page | perl.loop | Postings from April 2008

Re: benchmarking various event loops with and without anyevent

Thread Previous | Thread Next
From:
Marc Lehmann
Date:
April 25, 2008 23:53
Subject:
Re: benchmarking various event loops with and without anyevent
Message ID:
20080426065339.GA6612@schmorp.de
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


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About