*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 26 Apr 2013 12:15:26 +0200
changeset 1311 c88837870338
parent 1310 334663bda239
child 1312 6b35651ab77e
*** empty log message ***
host.rc
--- a/host.rc	Sun Mar 24 10:32:52 2013 +0100
+++ b/host.rc	Fri Apr 26 12:15:26 2013 +0200
@@ -68,12 +68,14 @@
     ].
 
     includes := ''.
-    incDir := Smalltalk getSystemFileName:'include'.
+    incDir := Smalltalk getSystemFileName:'include/stc.h'.
+    incDir notNil ifTrue:[ incDir := incDir asFilename directoryName ].
+
     incDir notNil ifTrue:[
 	includes := includes , '-I' , incDir asFilename pathName , ' '
     ] ifFalse:[
 	('../../../stx/include' asFilename exists) ifTrue:[
-	    "/ running in a development environment ...
+	    "/ running in a development environment...
 	    includes := includes , '-I../../../stx/include '.
 	] ifFalse:[
 	    "/ if this is a production program, dont care for a warning