in #startupJavaSystem:
authorcg
Thu, 12 Nov 1998 14:54:56 +0000
changeset 436 8ac4dcd7fba9
parent 435 de6d4b3a67ac
child 437 6e40fbebe1dc
in #startupJavaSystem: reinit classes by remembered init order (without flushing code), if this is not the very first startup.
Java.st
--- a/Java.st	Thu Nov 12 14:53:28 1998 +0000
+++ b/Java.st	Thu Nov 12 14:54:56 1998 +0000
@@ -577,17 +577,23 @@
         ^ self
     ].
 
-    'JAVA [info]: (re)initializing JAVA environment completely ...' infoPrintCR.
+    JavaClass orderOfClassInits isNil ifTrue:[
+        "/ the very first start ...
+        'JAVA [info]: (re)initializing JAVA environment completely ...' infoPrintCR.
 
-    JavaVM initializeVM.
+        JavaVM initializeVM.
 
+    ] ifFalse:[
+        'JAVA [info]: re-initializing JAVA classes ...' infoPrintCR.
+        JavaVM reinitializeVM.
+    ].    
     'JAVA [info]: done JAVA initialization.' infoPrintCR.
 
     "
      Java startupJavaSystem
     "
 
-    "Modified: / 27.4.1998 / 14:57:35 / cg"
+    "Modified: / 12.11.1998 / 15:35:38 / cg"
 !
 
 terminateAllThreads
@@ -1302,6 +1308,6 @@
 !Java class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/Java.st,v 1.78 1998/11/10 14:32:49 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/Java.st,v 1.79 1998/11/12 14:54:56 cg Exp $'
 ! !
 Java initialize!