equal
deleted
inserted
replaced
177 Smalltalk at:#BlockClosure put:Block. |
177 Smalltalk at:#BlockClosure put:Block. |
178 (cls := Smalltalk at:#DialogBox) notNil ifTrue:[ |
178 (cls := Smalltalk at:#DialogBox) notNil ifTrue:[ |
179 Smalltalk at:#Dialog put:cls. |
179 Smalltalk at:#Dialog put:cls. |
180 Smalltalk at:#DialogView put:cls. |
180 Smalltalk at:#DialogView put:cls. |
181 ]. |
181 ]. |
182 |
182 Smalltalk at:#ByteString put:String. |
183 Smalltalk at:#Console put:Stderr. |
183 Smalltalk at:#Console put:Stderr. |
184 |
184 |
185 FileDirectory notNil ifTrue:[ |
185 FileDirectory notNil ifTrue:[ |
186 Smalltalk at:#Disk put:(FileDirectory directoryNamed:'/') |
186 Smalltalk at:#Disk put:(FileDirectory directoryNamed:'/') |
187 ]. |
187 ]. |