equal
deleted
inserted
replaced
523 |
523 |
524 initializeClass:aClass |
524 initializeClass:aClass |
525 "sent from VM via #initializeModules" |
525 "sent from VM via #initializeModules" |
526 |
526 |
527 Error handle:[:ex | |
527 Error handle:[:ex | |
528 ClassesFailedToInitialize isNil ifTrue:[ |
528 ObjectMemory printStackBacktrace. |
529 ClassesFailedToInitialize := IdentitySet new. |
529 ClassesFailedToInitialize isNil ifTrue:[ |
530 ]. |
530 ClassesFailedToInitialize := IdentitySet new. |
531 ClassesFailedToInitialize add:aClass. |
531 ]. |
532 ('Smalltalk [warning]: error during initialize of ' , aClass name,': ', ex description printString) errorPrintCR. |
532 ClassesFailedToInitialize add:aClass. |
533 ex suspendedContext fullPrintAll. |
533 ('Smalltalk [warning]: error during initialize of ' , aClass name,': ', ex description printString) errorPrintCR. |
534 '------------------------------------------------' errorPrintCR. |
534 ex suspendedContext fullPrintAll. |
535 (Smalltalk commandLineArguments includes:'--debug') ifTrue:[ |
535 '------------------------------------------------' errorPrintCR. |
536 ex reject |
536 (Smalltalk commandLineArguments includes:'--debug') ifTrue:[ |
537 ]. |
537 ex reject |
|
538 ]. |
538 ] do:[ |
539 ] do:[ |
539 aClass initialize |
540 aClass initialize |
540 ]. |
541 ]. |
541 |
542 |
542 "Modified: / 11-09-2011 / 17:01:32 / cg" |
543 "Modified: / 11-09-2011 / 17:01:32 / cg" |
543 ! |
544 ! |
544 |
545 |
7779 ! ! |
7780 ! ! |
7780 |
7781 |
7781 !Smalltalk class methodsFor:'documentation'! |
7782 !Smalltalk class methodsFor:'documentation'! |
7782 |
7783 |
7783 version |
7784 version |
7784 ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.994 2012-10-24 16:58:50 sr Exp $' |
7785 ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.995 2012-10-25 13:11:58 cg Exp $' |
7785 ! |
7786 ! |
7786 |
7787 |
7787 version_CVS |
7788 version_CVS |
7788 ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.994 2012-10-24 16:58:50 sr Exp $' |
7789 ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.995 2012-10-25 13:11:58 cg Exp $' |
7789 ! |
7790 ! |
7790 |
7791 |
7791 version_SVN |
7792 version_SVN |
7792 ^ '§ Id: Smalltalk.st 10648 2011-06-23 15:55:10Z vranyj1 §' |
7793 ^ '§ Id: Smalltalk.st 10648 2011-06-23 15:55:10Z vranyj1 §' |
7793 ! ! |
7794 ! ! |