modules directory
authorClaus Gittinger <cg@exept.de>
Fri, 05 Aug 2011 18:04:03 +0200
changeset 2624 0c171a7d3fa9
parent 2623 a006a3ecfda8
child 2625 456f3966c6b4
modules directory
ParserFlags.st
--- a/ParserFlags.st	Thu Aug 04 21:34:23 2011 +0200
+++ b/ParserFlags.st	Fri Aug 05 18:04:03 2011 +0200
@@ -1191,7 +1191,12 @@
     STCKeepCIntermediate := false.
     STCKeepOIntermediate := false.
     STCKeepSTIntermediate := false.
-    STCModulePath := './modules'.
+    "/ if in the development directory, use ./modules
+    Smalltalk isSmalltalkDevelopmentSystem ifTrue:[
+        STCModulePath := './modules'.
+    ] ifFalse:[
+        STCModulePath := Filename tempDirectory constructString:'modules'.
+    ].
     STCCompilation := #default.
 
     OperatingSystem isMSWINDOWSlike ifTrue:[
@@ -1204,7 +1209,11 @@
         ].
         STCCompilationDefines := '-DWIN32'.
         STCCompilationOptions := '+optinline +inlineNew'.
-        STCPath := '..\..\stc\stc.exe'.
+        '..\..\stc\stc.exe' asFilename exists ifTrue:[
+            STCPath := '..\..\stc\stc.exe'.
+        ] ifFalse:[
+            STCPath := 'stc.exe'.
+        ].
         self useBorlandC ifTrue:[
             CCPath := 'bcc32'.
             MakeCommand := 'bmake'.
@@ -1241,7 +1250,7 @@
     "
 
     "Modified: / 09-08-2006 / 18:47:18 / fm"
-    "Modified: / 17-07-2010 / 14:45:19 / cg"
+    "Modified: / 05-08-2011 / 18:03:49 / cg"
 ! !
 
 !ParserFlags methodsFor:'accessing-compilation control'!
@@ -2033,11 +2042,11 @@
 !ParserFlags class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.63 2011-05-23 15:51:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.64 2011-08-05 16:04:03 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.63 2011-05-23 15:51:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.64 2011-08-05 16:04:03 cg Exp $'
 ! !
 
 ParserFlags initialize!