--- a/private.rc	Thu Jul 09 22:46:04 1998 +0200
+++ b/private.rc	Tue Aug 04 02:14:46 1998 +0200
@@ -289,6 +289,15 @@
 ObjectMemory startBackgroundCollectorAt:5. 
 ObjectMemory startBackgroundFinalizationAt:5. 
 
+"/ experimental:
+"/ run the background collector at a dynamic priority - it will
+"/ now always get a chance to make some progress ...
+
+thisIsMySystem ifTrue:[
+    ObjectMemory backgroundCollectProcess priorityRange:(4 to:9).
+    ObjectMemory backgroundFinalizationProcess priorityRange:(4 to:9).
+].
+
 "/ experimental: configure the memory manager to quickly increase
 "/ its oldSpace, as long as it stays below 8Mb (i.e. do not enter
 "/ a blocking mark&sweep or compress, but go straight ahead increasing