--- 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