--- a/ParserFlags.st Thu Jan 19 11:05:01 2012 +0100
+++ b/ParserFlags.st Fri Jan 20 15:34:39 2012 +0100
@@ -1338,12 +1338,6 @@
STCKeepCIntermediate := false.
STCKeepOIntermediate := false.
STCKeepSTIntermediate := false.
- "/ if in the development directory, use ./modules
- Smalltalk isSmalltalkDevelopmentSystem ifTrue:[
- STCModulePath := './modules'.
- ] ifFalse:[
- STCModulePath := Filename tempDirectory constructString:'modules'.
- ].
STCCompilation := #default.
self initializeSTCFlagsForTopDirectory:'../..'.
@@ -1353,7 +1347,7 @@
"
"Modified: / 09-08-2006 / 18:47:18 / fm"
- "Modified: / 19-01-2012 / 10:37:43 / cg"
+ "Modified: / 20-01-2012 / 15:32:17 / cg"
!
initializeSTCFlagsForTopDirectory:topDirArg
@@ -1373,11 +1367,10 @@
] ifFalse:[
STCModulePath := Filename tempDirectory constructString:'modules'.
].
- STCCompilation := #default.
(topDir asFilename construct:'stc') exists ifFalse:[
- 'Warning: stc not found in "../.."' infoPrintCR.
- 'stc-compiling (primitive code) will not work in the browser' infoPrintCR.
+ 'ParserFlags [warning]: stc not found in "../.."' infoPrintCR.
+ 'ParserFlags [warning]: stc-compiling (primitive code) will not work in the browser' infoPrintCR.
STCCompilation := #never.
].
@@ -2325,11 +2318,11 @@
!ParserFlags class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.80 2012-01-19 09:58:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.81 2012-01-20 14:34:39 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.80 2012-01-19 09:58:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.81 2012-01-20 14:34:39 cg Exp $'
! !
ParserFlags initialize!