private.rc
changeset 245 8579832e7fea
parent 244 3dc9518865e6
child 246 d74dbd141699
--- a/private.rc	Fri Aug 08 18:00:39 1997 +0200
+++ b/private.rc	Fri Aug 08 18:05:26 1997 +0200
@@ -222,13 +222,15 @@
 ].
 incDir := Smalltalk getSystemFileName:'include'.
 incDir notNil ifTrue:[
-    incDir asFilename exists ifTrue:[
-        includes := includes , '-I' , incDir asFilename pathName , ' '
-    ]
-].
-('/usr/local/lib/smalltalk/include' asFilename exists) ifTrue:[
+    includes := includes , '-I' , incDir asFilename pathName , ' '
+] ifFalse:[
     "/ running in a shared environment ...
     includes := includes , '-I/usr/local/lib/smalltalk/include '.
+
+    ('/usr/local/lib/smalltalk/include' asFilename exists) ifFalse:[
+	'private.rc [warning]: no include directory found (STX_PATH or /usr/local/lib/smalltalk).' errorPrintCR.
+	'private.rc [info]: this may affect stc-compilation from within the browser.' infoPrintCR.
+    ].
 ].
 
 Compiler stcCompilationIncludes:includes.