equal
deleted
inserted
replaced
741 (idx := CommandLineArguments indexOf:'--verboseStartup') ~~ 0 ifTrue:[ |
741 (idx := CommandLineArguments indexOf:'--verboseStartup') ~~ 0 ifTrue:[ |
742 VerboseLoading := true. |
742 VerboseLoading := true. |
743 VerboseStartup := true. |
743 VerboseStartup := true. |
744 CommandLineArguments removeIndex:idx |
744 CommandLineArguments removeIndex:idx |
745 ]. |
745 ]. |
746 (idx := CommandLineArguments indexOf:'--verbose') ~~ 0 ifTrue:[ |
|
747 VerboseLoading := true. |
|
748 VerboseStartup := true. |
|
749 CommandLineArguments removeIndex:idx. |
|
750 Logger notNil ifTrue:[ |
|
751 Logger loggingThreshold: Logger severityALL. |
|
752 ]. |
|
753 ]. |
|
754 |
746 |
755 "/ reinterpret those, in case given after the VM options. |
747 "/ reinterpret those, in case given after the VM options. |
756 (idx := CommandLineArguments indexOf:'--debugPrint') ~~ 0 ifTrue:[ |
748 (idx := CommandLineArguments indexOf:'--debugPrint') ~~ 0 ifTrue:[ |
757 ObjectMemory debugPrinting:true. |
749 ObjectMemory debugPrinting:true. |
758 CommandLineArguments removeIndex:idx |
750 CommandLineArguments removeIndex:idx |
764 |
756 |
765 (idx := CommandLineArguments indexOf:'--verbose') ~~ 0 ifTrue:[ |
757 (idx := CommandLineArguments indexOf:'--verbose') ~~ 0 ifTrue:[ |
766 Verbose := true. |
758 Verbose := true. |
767 VerboseLoading := true. |
759 VerboseLoading := true. |
768 VerboseStartup := true. |
760 VerboseStartup := true. |
|
761 Logger notNil ifTrue:[ |
|
762 Logger loggingThreshold: Logger severityALL. |
|
763 ]. |
769 CommandLineArguments removeIndex:idx |
764 CommandLineArguments removeIndex:idx |
770 ]. |
765 ]. |
771 ! |
766 ! |
772 |
767 |
773 isInitialized |
768 isInitialized |