equal
deleted
inserted
replaced
216 ^ nil |
216 ^ nil |
217 |
217 |
218 "Created: 16.4.1996 / 16:31:15 / cg" |
218 "Created: 16.4.1996 / 16:31:15 / cg" |
219 ! |
219 ! |
220 |
220 |
|
221 isBreakpointed |
|
222 "return true, if this is a wrapper method for a breakpoint. |
|
223 False is returned here - this method is redefined in WrappedMethod" |
|
224 |
|
225 ^ false |
|
226 |
|
227 "Created: 7.4.1997 / 17:24:40 / cg" |
|
228 ! |
|
229 |
221 isExecutable |
230 isExecutable |
222 "return true, if this codeObject is executable." |
231 "return true, if this codeObject is executable." |
223 |
232 |
224 self isInvalid ifTrue:[^ false]. |
233 self isInvalid ifTrue:[^ false]. |
225 ^ self code notNil |
234 ^ self code notNil |
243 |
252 |
244 ^ false |
253 ^ false |
245 |
254 |
246 "Created: 16.4.1996 / 16:32:11 / cg" |
255 "Created: 16.4.1996 / 16:32:11 / cg" |
247 "Modified: 16.4.1996 / 16:32:36 / cg" |
256 "Modified: 16.4.1996 / 16:32:36 / cg" |
|
257 ! |
|
258 |
|
259 isTraced |
|
260 "return true, if this is a wrapper method for a trace point. |
|
261 False is returned here - this method is redefined in WrappedMethod" |
|
262 |
|
263 ^ false |
|
264 |
|
265 "Created: 7.4.1997 / 17:24:50 / cg" |
248 ! |
266 ! |
249 |
267 |
250 isUnloaded |
268 isUnloaded |
251 "return true, if the objects machine code has been unloaded |
269 "return true, if the objects machine code has been unloaded |
252 from the system (i.e. it is not executable)." |
270 from the system (i.e. it is not executable)." |
301 ! ! |
319 ! ! |
302 |
320 |
303 !ExecutableFunction class methodsFor:'documentation'! |
321 !ExecutableFunction class methodsFor:'documentation'! |
304 |
322 |
305 version |
323 version |
306 ^ '$Header: /cvs/stx/stx/libbasic/Attic/ExecFunc.st,v 1.29 1997-01-23 12:48:05 cg Exp $' |
324 ^ '$Header: /cvs/stx/stx/libbasic/Attic/ExecFunc.st,v 1.30 1997-04-07 17:29:49 cg Exp $' |
307 ! ! |
325 ! ! |
308 ExecutableFunction initialize! |
326 ExecutableFunction initialize! |