equal
deleted
inserted
replaced
350 |
350 |
351 stcPath:aSymbol |
351 stcPath:aSymbol |
352 STCPath := aSymbol |
352 STCPath := aSymbol |
353 ! |
353 ! |
354 |
354 |
|
355 useBorlandC |
|
356 "/ ^ true. |
|
357 ^ OperatingSystem getCCDefine ='__BORLANDC__' |
|
358 |
|
359 "Created: / 15-03-2007 / 13:33:32 / cg" |
|
360 ! |
|
361 |
|
362 useGnuC |
|
363 ^ OperatingSystem getCCDefine = '__GNUC__' |
|
364 |
|
365 "Created: / 15-03-2007 / 13:34:49 / cg" |
|
366 ! |
|
367 |
355 withSTCCompilation:howSymbol do:aBlock |
368 withSTCCompilation:howSymbol do:aBlock |
356 |prev| |
369 |prev| |
357 |
370 |
358 prev := self stcCompilation. |
371 prev := self stcCompilation. |
359 self stcCompilation:howSymbol. |
372 self stcCompilation:howSymbol. |
1065 LinkArgs := '-L..\..\libbc -LC:\Borland\xxxxx\Lib -r -c -ap -Tpd -Gi -w-dup'. |
1078 LinkArgs := '-L..\..\libbc -LC:\Borland\xxxxx\Lib -r -c -ap -Tpd -Gi -w-dup'. |
1066 ]. |
1079 ]. |
1067 STCCompilationDefines := '-DWIN32'. |
1080 STCCompilationDefines := '-DWIN32'. |
1068 STCCompilationOptions := '+optinline +inlineNew'. |
1081 STCCompilationOptions := '+optinline +inlineNew'. |
1069 STCPath := '..\..\stc\stc.exe'. |
1082 STCPath := '..\..\stc\stc.exe'. |
1070 OperatingSystem getCCDefine = '__BORLANDC__' ifTrue:[ |
1083 self useBorlandC ifTrue:[ |
1071 CCPath := 'bcc32'. |
1084 CCPath := 'bcc32'. |
1072 MakeCommand := 'bmake'. |
1085 MakeCommand := 'bmake'. |
1073 CCCompilationOptions := '-w-'. |
1086 CCCompilationOptions := '-w-'. |
1074 ] ifFalse:[ |
1087 ] ifFalse:[ |
1075 CCPath := 'cl'. |
1088 CCPath := 'cl'. |
1083 STCCompilationIncludes := '-I../../include'. |
1096 STCCompilationIncludes := '-I../../include'. |
1084 STCCompilationDefines := ''. |
1097 STCCompilationDefines := ''. |
1085 STCCompilationOptions := '+optinline +inlineNew'. |
1098 STCCompilationOptions := '+optinline +inlineNew'. |
1086 STCPath := '../../stc/stc'. |
1099 STCPath := '../../stc/stc'. |
1087 CCCompilationOptions := '-O'. |
1100 CCCompilationOptions := '-O'. |
1088 OperatingSystem getCCDefine = '__GNUC__' ifTrue:[ |
1101 ParserFlags useGnuC ifTrue:[ |
1089 CCPath := 'gcc' |
1102 CCPath := 'gcc' |
1090 ] ifFalse:[ |
1103 ] ifFalse:[ |
1091 CCPath := 'cc' |
1104 CCPath := 'cc' |
1092 ]. |
1105 ]. |
1093 LinkArgs := ''. |
1106 LinkArgs := ''. |
1100 " |
1113 " |
1101 ParserFlags initialize |
1114 ParserFlags initialize |
1102 " |
1115 " |
1103 |
1116 |
1104 "Modified: / 09-08-2006 / 18:47:18 / fm" |
1117 "Modified: / 09-08-2006 / 18:47:18 / fm" |
1105 "Modified: / 20-11-2006 / 14:27:45 / cg" |
1118 "Modified: / 15-03-2007 / 13:35:00 / cg" |
1106 ! ! |
1119 ! ! |
1107 |
1120 |
1108 !ParserFlags methodsFor:'accessing-compilation control'! |
1121 !ParserFlags methodsFor:'accessing-compilation control'! |
1109 |
1122 |
1110 allowExtensionsToPrivateClasses |
1123 allowExtensionsToPrivateClasses |
1770 ! ! |
1783 ! ! |
1771 |
1784 |
1772 !ParserFlags class methodsFor:'documentation'! |
1785 !ParserFlags class methodsFor:'documentation'! |
1773 |
1786 |
1774 version |
1787 version |
1775 ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.35 2006-11-20 13:30:08 cg Exp $' |
1788 ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.36 2007-03-15 12:39:03 cg Exp $' |
1776 ! ! |
1789 ! ! |
1777 |
1790 |
1778 ParserFlags initialize! |
1791 ParserFlags initialize! |