--- deliantra/server/common/map.C	2007/01/01 00:41:02	1.63
+++ deliantra/server/common/map.C	2007/01/01 21:19:51	1.65
@@ -331,6 +331,17 @@
   sum_weight (container);
 }
 
+void
+maptile::set_object_flag (int flag, int value)
+{
+  if (!spaces)
+    return;
+
+  for (mapspace *ms = spaces + size (); ms-- > spaces; )
+    for (object *tmp = ms->bot; tmp; tmp = tmp->above)
+      tmp->flag [flag] = value;
+}
+
 /* link_multipart_objects go through all the objects on the map looking
  * for objects whose arch says they are multipart yet according to the
  * info we have, they only have the head (as would be expected when
@@ -478,6 +489,8 @@
 bool
 maptile::save_objects (object_freezer &freezer, int flags)
 {
+  static int cede_count = 0;
+
   if (flags & IO_HEADER)
     save_header (freezer);
 
@@ -486,9 +499,18 @@
 
   for (int i = 0; i < size (); ++i)
     {
+      if (cede_count >= 500)
+        {
+          cede_count = 0;
+          coroapi::cede ();
+        }
+
       int unique = 0;
       for (object *op = spaces [i].bot; op; op = op->above)
         {
+          // count per-object, but cede only when modification-safe
+          cede_count++;
+
           if (op->flag [FLAG_UNIQUE] && op->flag [FLAG_IS_FLOOR])
             unique = 1;