Issue #94: Nuked `h_win32.rc`
...now obsolete. Both package path setup and compiler flags setup
has been moved to classes.
--- a/h_win32.rc Mon Jul 04 23:25:38 2016 +0100
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,39 +0,0 @@
-"*
- * Encoding: iso8859-1
- *
- * $Header$
- *
- * MIMEType: application/x-smalltalk-source
- *
- * ST/X startup configuration file - for win95, win98 and winNT OS.
- *
- * DONT add site specific things here - use your own h_xxx.rc file instead
- * where xxx stands for your hostname(s)
- *"
-!
-"/ look in registry for LibDir ...
-|k rel curr libDir|
-
-rel := Smalltalk versionString.
-k := Win32OperatingSystem registryEntry key:('HKEY_LOCAL_MACHINE\Software\eXept\Smalltalk/X\',rel).
-k isNil ifTrue:[
- k := Win32OperatingSystem registryEntry key:'HKEY_LOCAL_MACHINE\Software\eXept\Smalltalk/X'.
- k notNil ifTrue:[
- curr := k valueNamed:'CurrentVersion'.
- curr isString ifTrue:[
- k close.
- k := Win32OperatingSystem registryEntry key:('HKEY_LOCAL_MACHINE\Software\eXept\Smalltalk/X\',curr).
- ]
- ]
-].
-k notNil ifTrue:[
- libDir := k valueNamed:'LibDir'.
- (libDir notNil and:[libDir asFilename exists]) ifTrue:[
- (Smalltalk systemPath includes:(libDir asFilename pathName)) ifFalse:[
- Smalltalk systemPath addFirst:(libDir asFilename pathName).
- Smalltalk flushPathCaches
- ]
- ].
- k close.
-].
-!
\ No newline at end of file