1
0
Fork 0

misc: Increase portability and initialize at most once

Use the custom "^self basicNew initialize" to create and
initialize the object.
This commit is contained in:
Holger Hans Peter Freyther 2014-07-24 15:40:10 +02:00
parent 9279ed70c1
commit 9cf469c261
7 changed files with 7 additions and 20 deletions

View File

@ -24,9 +24,7 @@ Collection subclass: MessageBuffer [
MessageBuffer class >> new [ MessageBuffer class >> new [
<category: 'creation'> <category: 'creation'>
^ (super new) ^self basicNew initialize
initialize;
yourself
] ]
initialize [ initialize [

View File

@ -64,9 +64,7 @@ Object subclass: TLVDescription [
new [ new [
<category: 'creation'> <category: 'creation'>
^ super basicNew ^self basicNew initialize
initialize;
yourself
] ]
] ]

View File

@ -24,9 +24,7 @@ Object subclass: IPADispatcher [
IPADispatcher class >> new [ IPADispatcher class >> new [
<category: 'creation'> <category: 'creation'>
^ super new ^self basicNew initialize
initialize;
yourself
] ]
initialize [ initialize [

View File

@ -107,8 +107,7 @@ Object subclass: StructCreator [
] ]
StructCreator class >> new [ StructCreator class >> new [
^ super new ^self basicNew initialize
initialize
] ]
initialize [ initialize [

View File

@ -39,9 +39,7 @@ a single ASP to send one ASPActive for one interface at a time.'>
] ]
M2UAApplicationServerProcess class >> new [ M2UAApplicationServerProcess class >> new [
^super new ^self basicNew initialize
initialize;
yourself
] ]
onError: aBlock [ onError: aBlock [

View File

@ -34,9 +34,7 @@ This class is currently not used!'>
] ]
M2UAAspStateMachine class >> new [ M2UAAspStateMachine class >> new [
^(self basicNew) ^self basicNew initialize
initialize;
yourself
] ]
entered: aState [ entered: aState [

View File

@ -24,9 +24,7 @@ Object subclass: OsmoUDPSocket [
OsmoUDPSocket class >> new [ OsmoUDPSocket class >> new [
<category: 'creation'> <category: 'creation'>
^ super new ^self basicNew initialize
initialize;
yourself
] ]
initialize [ initialize [