equal
deleted
inserted
replaced
441 |
441 |
442 In the debugger, press 'Abort' to continue execution. |
442 In the debugger, press 'Abort' to continue execution. |
443 " |
443 " |
444 AutoloadFailedSignal |
444 AutoloadFailedSignal |
445 raiseRequestWith:self |
445 raiseRequestWith:self |
446 errorString:('autoload of ' , myName , ' failed'). |
446 errorString:('autoload of %1 failed (%2)' |
|
447 bindWith:myName |
|
448 with:(newClass isNil ifTrue:['nil result'] ifFalse:['still unloaded'])). |
447 ^ nil |
449 ^ nil |
448 ]. |
450 ]. |
449 |
451 |
450 newClass setPackage:packageID. |
452 newClass setPackage:packageID. |
451 newClass instAndClassSelectorsAndMethodsDo:[:sel :mthd | mthd setPackage:packageID]. |
453 newClass instAndClassSelectorsAndMethodsDo:[:sel :mthd | mthd setPackage:packageID]. |
759 ! ! |
761 ! ! |
760 |
762 |
761 !Autoload class methodsFor:'documentation'! |
763 !Autoload class methodsFor:'documentation'! |
762 |
764 |
763 version |
765 version |
764 ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.156 2010-02-05 13:00:22 cg Exp $' |
766 ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.157 2010-03-13 11:36:57 cg Exp $' |
765 ! |
767 ! |
766 |
768 |
767 version_CVS |
769 version_CVS |
768 ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.156 2010-02-05 13:00:22 cg Exp $' |
770 ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.157 2010-03-13 11:36:57 cg Exp $' |
769 ! ! |
771 ! ! |
770 |
772 |
771 Autoload initialize! |
773 Autoload initialize! |