StandaloneStartup.st
changeset 16235 9cc3d059960d
parent 16233 978ff870bd57
child 16236 7a8308397650
equal deleted inserted replaced
16234:ea850c2ab6bc 16235:9cc3d059960d
   965         --rcFileName ......... define a startup rc-file
   965         --rcFileName ......... define a startup rc-file
   966         --scripting portNr ... start a scripting server
   966         --scripting portNr ... start a scripting server
   967         --allowHost host ..... add host to the allowed scripting hosts
   967         --allowHost host ..... add host to the allowed scripting hosts
   968     "
   968     "
   969 
   969 
   970     |idx debugging|
   970     |idx debugging baseDir|
   971 
   971 
   972 "/    Smalltalk beHeadless:true.
   972 "/    Smalltalk beHeadless:true.
   973 "/    OperatingSystem disableSignal:(OperatingSystem sigHUP).
   973 "/    OperatingSystem disableSignal:(OperatingSystem sigHUP).
   974 "/    Smalltalk infoPrinting:true.
   974 "/    Smalltalk infoPrinting:true.
   975 
   975 
   997     debugging ifTrue:[
   997     debugging ifTrue:[
   998         self setupToolsForDebug.
   998         self setupToolsForDebug.
   999     ] ifFalse:[
   999     ] ifFalse:[
  1000         self setupToolsForNoDebug.
  1000         self setupToolsForNoDebug.
  1001     ].
  1001     ].
  1002     Smalltalk initSystemPath.
  1002     "/opt/expecco/bin/expecco -> /opt/expecco"
       
  1003     baseDir := OperatingSystem pathOfSTXExecutable asFilename directory directory.
       
  1004     Smalltalk packagePath 
       
  1005                 add:(baseDir constructString:'packages');
       
  1006                 add:(baseDir constructString:'plugins').
  1003 
  1007 
  1004     (self suppressRCFileReading) ifFalse:[
  1008     (self suppressRCFileReading) ifFalse:[
  1005         self handleRCFileOptionsFromArguments:argv.
  1009         self handleRCFileOptionsFromArguments:argv.
  1006     ].
  1010     ].
  1007     (self allowScriptingOption) ifTrue:[
  1011     (self allowScriptingOption) ifTrue:[
  1199 ! !
  1203 ! !
  1200 
  1204 
  1201 !StandaloneStartup class methodsFor:'documentation'!
  1205 !StandaloneStartup class methodsFor:'documentation'!
  1202 
  1206 
  1203 version
  1207 version
  1204     ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.84 2014-03-07 08:07:34 stefan Exp $'
  1208     ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.85 2014-03-07 14:25:54 stefan Exp $'
  1205 !
  1209 !
  1206 
  1210 
  1207 version_CVS
  1211 version_CVS
  1208     ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.84 2014-03-07 08:07:34 stefan Exp $'
  1212     ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.85 2014-03-07 14:25:54 stefan Exp $'
  1209 ! !
  1213 ! !
  1210 
  1214 
  1211 
  1215 
  1212 StandaloneStartup initialize!
  1216 StandaloneStartup initialize!