equal
deleted
inserted
replaced
1 "/ |
1 "/ |
2 "/ $Header$ |
2 "/ $Header$ |
|
3 "/ |
|
4 "/ ST/X startup configuration & command file: |
3 "/ |
5 "/ |
4 "/ startup configuration for smalltalk |
6 "/ startup configuration for smalltalk |
5 "/ |
7 "/ |
6 "/ - everything in here are plain smalltalk expressions; |
8 "/ - everything in here are plain smalltalk expressions; |
7 "/ - statements with in a group are separated by a period. |
9 "/ - statements with in a group are separated by a period. |
154 'smalltalk.rc [warning]: Configuration without display.' errorPrintCR. |
156 'smalltalk.rc [warning]: Configuration without display.' errorPrintCR. |
155 ]. |
157 ]. |
156 '' errorPrintCR. |
158 '' errorPrintCR. |
157 'Textmode (enter smalltalk expressions terminated by single exclamation mark;' errorPrintCR. |
159 'Textmode (enter smalltalk expressions terminated by single exclamation mark;' errorPrintCR. |
158 OperatingSystem isUNIXlike ifTrue:[ |
160 OperatingSystem isUNIXlike ifTrue:[ |
159 ' CTRL-D to leave line-by-line interpreter.)' errorPrintCR. |
161 ' CTRL-D to leave line-by-line interpreter.)' errorPrintCR. |
160 ] ifFalse:[ |
162 ] ifFalse:[ |
161 ' CTRL-Z to leave line-by-line interpreter.)' errorPrintCR. |
163 ' CTRL-Z to leave line-by-line interpreter.)' errorPrintCR. |
162 ]. |
164 ]. |
163 Smalltalk readEvalPrint. |
165 Smalltalk readEvalPrint. |
164 Smalltalk exit |
166 Smalltalk exit |
165 ]. |
167 ]. |
166 |
168 |