--- a/private.rc	Sun Mar 02 11:46:47 1997 +0100
+++ b/private.rc	Fri Apr 11 13:02:07 1997 +0200
@@ -28,11 +28,12 @@
 "/
 "/ you may limit the amount of memory allocated to
 "/ dynamic compiled code ...
-"/ (I use a very small size, to stress the garbage collector a bit;
-"/  you should not do so. A good limit is some 0.5 to 1Mb)
+"/ The default is unlimited; 
+"/ If you run in a multiuser environment, or
+"/ short on swapSpace, a good limit is some 0.5 to 1Mb.
 "/
 
-"/    ObjectMemory dynamicCodeLimit:64000.
+"/    ObjectMemory dynamicCodeLimit:500000.
 
 "/
 "/ If local sources have preference over source code managment
@@ -88,8 +89,6 @@
 		  and:[domain = 'axept.de' or:[domain = 'exept.de']].
 
 thisIsMySystem ifTrue:[
-    ObjectMemory dynamicCodeLimit:64000.
-
     MenuView defaultFont:(MenuView defaultFont size:10).
 
     Smalltalk systemPath addFirst:'../../not_delivered'.
@@ -145,17 +144,19 @@
 "/     I startup the rdoit server process;
 "/     (using rdoit to start ST/X views via window manager menus ...)
 "/
+"
 thisIsMySystem ifTrue:[
     'private.rc [info]: starting RDoItServer ...' infoPrintCR.
     Autoload autoloadFailedSignal handle:[:ex |
 	'private.rc [warning]: cannot load RDoItServer' errorPrintCR
-   	ex return
+	ex return
     ] do:[
-        RDoItServer autoload.
-        RDoItServer start.
-        RDoItServer allowHost:'localhost'.
+	RDoItServer autoload.
+	RDoItServer start.
+	RDoItServer allowHost:'localhost'.
     ]
 ].
+"
 
 "/ claus:
 "/     I dont want those warnings about stx features being non-portable ...
@@ -240,6 +241,7 @@
 ObjectMemory freeSpaceGCAmount:1000000. 
 ObjectMemory freeSpaceGCLimit:250000. 
 ObjectMemory incrementalGCLimit:500000. 
+ObjectMemory oldSpaceIncrement:500000.
 ObjectMemory startBackgroundCollectorAt:5. 
 ObjectMemory startBackgroundFinalizationAt:5. 
 
@@ -312,6 +314,8 @@
 ].
 
 Smalltalk addStartBlock:[
+    |s|
+
     "/
     "/ start some views ...
     "/ you can add all stuff you'd like to come up by default