equal
deleted
inserted
replaced
257 "wow - it worked. now the big trick ..." |
257 "wow - it worked. now the big trick ..." |
258 |
258 |
259 newClass class setSoleInstance:self. "/ will be undone by become ... |
259 newClass class setSoleInstance:self. "/ will be undone by become ... |
260 self becomeSameAs:newClass. |
260 self becomeSameAs:newClass. |
261 LoadedClasses rehash. |
261 LoadedClasses rehash. |
262 self initialize. "/ thats the new class now |
262 newClass initialize. |
263 self postAutoload. |
263 newClass postAutoload. |
264 ^ self "this is now the new class - see what doesNotUnderstand: does with it" |
264 ^ newClass |
265 ! ! |
265 ! ! |
266 |
266 |
267 !Autoload class methodsFor:'message catching'! |
267 !Autoload class methodsFor:'message catching'! |
268 |
268 |
269 basicNew |
269 basicNew |
364 ! ! |
364 ! ! |
365 |
365 |
366 !Autoload class methodsFor:'documentation'! |
366 !Autoload class methodsFor:'documentation'! |
367 |
367 |
368 version |
368 version |
369 ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.38 1996-01-15 14:04:23 cg Exp $' |
369 ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.39 1996-01-22 13:20:03 cg Exp $' |
370 ! ! |
370 ! ! |
371 Autoload initialize! |
371 Autoload initialize! |