equal
deleted
inserted
replaced
115 |
115 |
116 createIsAbstractMethodIn:aClass |
116 createIsAbstractMethodIn:aClass |
117 "create a #isABstract query method (I'm tired of typing)" |
117 "create a #isABstract query method (I'm tired of typing)" |
118 |
118 |
119 ^ self new createIsAbstractMethodIn:aClass |
119 ^ self new createIsAbstractMethodIn:aClass |
|
120 ! |
|
121 |
|
122 createIsObsoleteMethodIn:aClass |
|
123 "create a #isABstract query method (I'm tired of typing)" |
|
124 |
|
125 ^ self new createIsObsoleteMethodIn:aClass |
|
126 |
|
127 "Created: / 13-09-2018 / 14:34:06 / Claus Gittinger" |
120 ! |
128 ! |
121 |
129 |
122 createParametrizedInstanceCreationMethodsNamed:selector in:aClass |
130 createParametrizedInstanceCreationMethodsNamed:selector in:aClass |
123 "create a #selector instance creation method (I'm tired of typing)" |
131 "create a #selector instance creation method (I'm tired of typing)" |
124 |
132 |
1153 "create a #isAbstract query method (I'm tired of typing)" |
1161 "create a #isAbstract query method (I'm tired of typing)" |
1154 |
1162 |
1155 self subclassResponsibility |
1163 self subclassResponsibility |
1156 ! |
1164 ! |
1157 |
1165 |
|
1166 createIsObsoleteMethodIn:aClass |
|
1167 "create a #isObsolete query method (I'm tired of typing)" |
|
1168 |
|
1169 self subclassResponsibility |
|
1170 |
|
1171 "Created: / 13-09-2018 / 14:33:59 / Claus Gittinger" |
|
1172 ! |
|
1173 |
1158 createParametrizedInstanceCreationMethodsNamed:selector in:aClass |
1174 createParametrizedInstanceCreationMethodsNamed:selector in:aClass |
1159 "create a #selector instance creation method (I'm tired of typing)" |
1175 "create a #selector instance creation method (I'm tired of typing)" |
1160 |
1176 |
1161 self subclassResponsibility |
1177 self subclassResponsibility |
1162 ! |
1178 ! |