[ViewVC] Diff of: cvs/deliantra/server/lib/cf.pm

Comparing deliantra/server/lib/cf.pm (file contents):
Revision 1.400 by root, Mon Dec 17 06:36:34 2007 UTC vs.
Revision 1.403 by root, Mon Dec 17 07:09:18 2007 UTC

    $RUNTIME   += $TICK;
    $NEXT_TICK += $TICK;
    if ($NOW >= $NEXT_RUNTIME_WRITE) {
-      $NEXT_RUNTIME_WRITE = $NOW + 10;
+      $NEXT_RUNTIME_WRITE = List::Util::max $NEXT_RUNTIME_WRITE + 10, $NOW + 5.;
       Coro::async_pool {
          $Coro::current->{desc} = "runtime saver";
          write_runtime
             or warn "ERROR: unable to write runtime file: $!";
       };
    _post_tick;
 };
 $TICK_WATCHER->priority (EV::MAXPRI);
 {
+   # configure BDB
    BDB::min_parallel 8;
    BDB::max_poll_reqs $TICK * 0.1;
+   $Coro::BDB::WATCHER->priority (1);
    unless ($DB_ENV) {
       $DB_ENV = BDB::db_env_create;
       $DB_ENV->set_flags (BDB::AUTO_COMMIT | BDB::REGION_INIT | BDB::TXN_NOSYNC
                           | BDB::LOG_AUTOREMOVE, 1);
       BDB::db_env_memp_trickle $DB_ENV, 20, 0, sub { };
    };
 }
 {
+   # configure IO::AIO
    IO::AIO::min_parallel 8;
-   undef $Coro::AIO::WATCHER;
    IO::AIO::max_poll_time $TICK * 0.1;
-   $AIO_POLL_WATCHER = EV::io IO::AIO::poll_fileno, EV::READ, \&IO::AIO::poll_cb;
+   $Coro::AIO::WATCHER->priority (1);
 }
 my $_log_backtrace;
 sub _log_backtrace {

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines