--- a/host.rc	Wed Apr 30 16:53:51 1997 +0200
+++ b/host.rc	Fri May 02 10:08:18 1997 +0200
@@ -15,11 +15,11 @@
 sysType := OperatingSystem getSystemType.
 isStupidSYSV3 := false.
 
-"/ on some systems, paging in  is so slow, that a SIGALRM
+"/ on some systems, paging in is so slow, that a SIGALRM
 "/ arrives too early to be handled correctly 
 "/ (I guess, this is my fault somewhere ... ;-)
 "/
-"/ This can be worded around by disabling the timer here.
+"/ This can be worked around by disabling the timer here.
 "/ (The sceduler will reenable it later)
 
 (sysType = 'hpux') ifTrue:[
@@ -89,6 +89,8 @@
 "/ on a host called 'ibm'.
 "/ You can change this for your environment and/or make it
 "/ unconditional.
+"/ Consider the stuff below as an example; you should add
+"/ corresponding setup into a private h_xxxx.rc file.
 
 domain := OperatingSystem getDomainName.
 (domain = 'axept.de' or:[domain = 'exept.de']) ifTrue:[

--- a/private.rc	Wed Apr 30 16:53:51 1997 +0200
+++ b/private.rc	Fri May 02 10:08:18 1997 +0200
@@ -180,21 +180,27 @@
 "/ BTW: its only supported on ELF systems and Linux - anyway 
 "/      (and not in the free demo release).
 "/
-conf := Smalltalk configuration.
-(conf includesString:'gcc') ifTrue:[
-    Compiler ccPath:'gcc'
-] ifFalse:[
-    Compiler ccPath:'cc'
-].
+
+"/ mhmh - this should be done in the host file ...
 
 Compiler stcCompilation:#default.
 Compiler stcCompilationOptions:'+optinline +inlineNew'.
 
-"/ special options req'd for some systems (should be done in the host file ...)
+systemType := OperatingSystem getOSType.
+systemType = 'win32' ifTrue:[
+    Compiler ccPath:'cl'.
+    Compiler ccCompilationOptions:'/O1'.
+] ifFalse:[
+    conf := Smalltalk configuration.
+    (conf includesString:'gcc') ifTrue:[
+	Compiler ccPath:'gcc'
+    ] ifFalse:[
+	Compiler ccPath:'cc'
+    ].
+    Compiler ccCompilationOptions:'-O'.
+].
+Compiler stcCompilationIncludes:'-I../../include'.
 
-systemType := OperatingSystem getOSType.
-
-Compiler stcCompilationIncludes:'-I../../include'.
 
 thisIsMySystem ifTrue:[
     "/
@@ -213,8 +219,10 @@
 "/              Compiler stcCompilationIncludes:'-I../../include -I../../support/MESA/Mesa1.2.5/include'.
 "/              Compiler stcCompilationDefines:'-DOPENGL -DMESA'.
 "/          ] ifFalse:[
-		Compiler stcCompilationIncludes:'-I../../include -I../../support/VGL/vogl/src'.
-		Compiler stcCompilationDefines:'-DVGL'.
+		Display supportsGLDrawing ifTrue:[
+		    Compiler stcCompilationIncludes:'-I../../include -I../../support/VGL/vogl/src'.
+		    Compiler stcCompilationDefines:'-DVGL'.
+		]
 "/          ].
 
 	    "/ specify additional link libraries.
@@ -228,8 +236,6 @@
     ]
 ].
 
-Compiler ccCompilationOptions:'-O'.
-
 systemType = 'solaris' ifTrue:[
     Compiler ccCompilationOptions:'-O -fPIC'
 ].
@@ -242,7 +248,7 @@
 "/ for short periods of time, since it prepares itself for that situation
 "/ during idle time. (I often walk around in the fileBrowser, loading big
 "/ files like XWorkstation.st or SystemBrowser.st ....)
-"/
+
 ObjectMemory freeSpaceGCAmount:1000000. 
 ObjectMemory freeSpaceGCLimit:250000. 
 ObjectMemory incrementalGCLimit:500000.