equal
deleted
inserted
replaced
11 * startup configuration for host specific stuff - |
11 * startup configuration for host specific stuff - |
12 * looks for a system specific h_sysType.rc init file and loads it. |
12 * looks for a system specific h_sysType.rc init file and loads it. |
13 * looks for a host specific h_hostName.rc init file and loads it. |
13 * looks for a host specific h_hostName.rc init file and loads it. |
14 *" |
14 *" |
15 ! |
15 ! |
16 |sysType host domain s rshCommand isStupidSYSV3 conf includes incDir ps| |
16 |sysType host domain s conf includes incDir| |
17 |
17 |
18 sysType := OperatingSystem getSystemType. |
18 sysType := OperatingSystem getSystemType. |
19 isStupidSYSV3 := false. |
|
20 |
|
21 sysType = 'realIX' ifTrue:[ |
|
22 "/ |
|
23 "/ those people must have been brain-damaged; |
|
24 "/ They made a whole lot of trouble by renaming |
|
25 "/ 'rsh' to 'remsh' (those systems are broken in other places as well ...). |
|
26 "/ (who needs a restricted shell named 'rsh' ?) |
|
27 "/ |
|
28 isStupidSYSV3 := true. |
|
29 ]. |
|
30 |
19 |
31 "------------------------------------------------------------------------" |
20 "------------------------------------------------------------------------" |
32 "/ printer setup |
21 "/ printer setup |
33 "/ Notice that this setup may be changed by an OS-specific h_xxx file |
22 "/ Notice that this setup may be changed by an OS-specific h_xxx file |
34 "/ |
23 "/ |
47 "------------------------------------------------------------------------" |
36 "------------------------------------------------------------------------" |
48 "/ default compiler setup; |
37 "/ default compiler setup; |
49 "/ can be rechanged in a h_xxx file. |
38 "/ can be rechanged in a h_xxx file. |
50 "/ |
39 "/ |
51 |
40 |
52 (Smalltalk wasStartedFromImage not |
41 (Smalltalk wasStartedFromImage not and:[ Smalltalk isPlugin not ]) |
53 and:[ Smalltalk isPlugin not ]) |
|
54 ifTrue:[ |
42 ifTrue:[ |
55 Compiler stcCompilation:#default. |
43 Compiler stcCompilation:#default. |
56 Compiler stcCompilationOptions:'+optinline +inlineNew'. |
44 Compiler stcCompilationOptions:'+optinline +inlineNew'. |
57 |
45 |
58 "/ |
46 "/ |