equal
deleted
inserted
replaced
19 |
19 |
20 Workstation comment:' |
20 Workstation comment:' |
21 COPYRIGHT (c) 1989 by Claus Gittinger |
21 COPYRIGHT (c) 1989 by Claus Gittinger |
22 All Rights Reserved |
22 All Rights Reserved |
23 |
23 |
24 $Header: /cvs/stx/stx/libview/Attic/Workstat.st,v 1.11 1995-02-18 15:52:44 claus Exp $ |
24 $Header: /cvs/stx/stx/libview/Attic/Workstat.st,v 1.12 1995-05-03 00:26:48 claus Exp $ |
25 '! |
25 '! |
26 |
26 |
27 Smalltalk at:#Display put:nil! |
27 Smalltalk at:#Display put:nil! |
28 |
28 |
29 !Workstation class methodsFor:'documentation'! |
29 !Workstation class methodsFor:'documentation'! |
42 " |
42 " |
43 ! |
43 ! |
44 |
44 |
45 version |
45 version |
46 " |
46 " |
47 $Header: /cvs/stx/stx/libview/Attic/Workstat.st,v 1.11 1995-02-18 15:52:44 claus Exp $ |
47 $Header: /cvs/stx/stx/libview/Attic/Workstat.st,v 1.12 1995-05-03 00:26:48 claus Exp $ |
48 " |
48 " |
49 ! |
49 ! |
50 |
50 |
51 documentation |
51 documentation |
52 " |
52 " |
78 |
78 |
79 Display := workstationType basicNew initializeFor:nil. |
79 Display := workstationType basicNew initializeFor:nil. |
80 Display notNil ifTrue:[ |
80 Display notNil ifTrue:[ |
81 DisplayRootView initialize. |
81 DisplayRootView initialize. |
82 ] |
82 ] |
83 ] ifFalse:[ |
83 ]. |
84 NeXTWorkstation notNil ifTrue:[ |
84 |
|
85 " |
|
86 preparation for NeXTStep interfacing; |
|
87 (but if X is linked in, this will be our default Display) |
|
88 " |
|
89 NeXTWorkstation notNil ifTrue:[ |
|
90 NeXTWorkstation initialize. |
|
91 |
|
92 Display isNil ifTrue:[ |
85 Display := NeXTWorkstation basicNew initialize. |
93 Display := NeXTWorkstation basicNew initialize. |
|
94 ] |
|
95 ]. |
|
96 OS2Workstation notNil ifTrue:[ |
|
97 OS2Workstation initialize. |
|
98 |
|
99 Display isNil ifTrue:[ |
|
100 Display := OS2Workstation basicNew initialize. |
|
101 ] |
|
102 ]. |
|
103 Win32Workstation notNil ifTrue:[ |
|
104 Win32Workstation initialize. |
|
105 |
|
106 Display isNil ifTrue:[ |
|
107 Display := Win32Workstation basicNew initialize. |
86 ] |
108 ] |
87 ] |
109 ] |
88 ] |
110 ] |
89 ! |
111 ! |
90 |
112 |