--- deliantra/server/ext/map-random.ext	2009/06/06 21:43:13	1.33
+++ deliantra/server/ext/map-random.ext	2009/11/09 03:08:55	1.37
@@ -57,7 +57,6 @@
 }
 
 sub clean_random_maps {
-   return;#d#
    my $files = Coro::AIO::aio_readdirx $cf::RANDOMDIR, IO::AIO::READDIR_STAT_ORDER
       or return;
 
@@ -176,6 +175,26 @@
       }
    };
 }
+
+# save test
+if (0) {
+   cf::async {
+      # 0.080
+      Coro::Timer::sleep 2;
+      my $map = cf::map::find "/mlab/citydeclouds2";
+      $map->load_header;
+      $map->load;
+      $map->post_load_original;
+      my $m=100;
+      for (1..50) {
+         my $t=EV::time;
+         $map->_save_objects ("/tmp/x", cf::IO_HEADER | cf::IO_OBJECTS | cf::IO_UNIQUES);
+         $t = EV::time-$t;
+         $m=$t if $m>$t;
+         warn $m;
+      }
+   };
+}
 
 1