src/JavaVM.st
branchjk_new_structure
changeset 1200 c2d29943be5a
parent 1196 553f16135fd3
child 1201 326987885b9b
--- a/src/JavaVM.st	Thu Dec 01 11:09:01 2011 +0000
+++ b/src/JavaVM.st	Thu Dec 01 16:43:13 2011 +0000
@@ -2968,6 +2968,7 @@
     thread instVarNamed: 'single_step' put: 0.
     thread instVarNamed: 'daemon' put: 0.
     thread instVarNamed: 'stillborn' put: 0.
+    thread instVarNamed: 'threadStatus' put: 0.
     thread instVarNamed: 'target' put: nil.
     thread instVarNamed: 'blockerLock'
         put: (JavaVM classForName: 'java.lang.Object') basicNew.
@@ -2980,14 +2981,17 @@
         thread instVarAt: i put: 0.
     ].
     thread instVarNamed: 'group' put: (self standardThreadGroup).
-    threadClass classLoader isNil ifTrue: [thread instVarNamed:'contextClassLoader' put: self systemClassLoader] ifFalse: [thread instVarNamed: 'contextClassLoader' put: threadClass classLoader].
-
+    threadClass classLoader isNil ifTrue: [
+        thread instVarNamed: 'contextClassLoader' put: self systemClassLoader
+    ] ifFalse: [
+        thread instVarNamed: 'contextClassLoader' put: threadClass classLoader
+    ].
     ^ thread
 
     "Created: / 03-01-1998 / 01:47:30 / cg"
     "Modified: / 27-01-1998 / 00:54:33 / cg"
     "Modified: / 21-11-2011 / 09:48:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 29-11-2011 / 14:30:00 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
+    "Modified: / 01-12-2011 / 17:43:38 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
 !
 
 stProcessForJavaThread:jThread
@@ -3066,14 +3070,13 @@
                         bindWith: jThread printString)
                 severity: #debug
                 facility: #JVM.
-      
+                jThread instVarNamed: 'threadStatus' put: 0.
             (self monitorFor: jThread) disableWait.
             self acquireMonitorAndNotifyAll: jThread.
-            
-           
         ].
     stProcess name: 'JAVA-' , nm.
     stProcess restartable: true.
+    jThread instVarNamed: 'threadStatus' put: 1.
     stProcess resume.
     Java threads at: jThread put: stProcess.
     ^ nil
@@ -3081,7 +3084,7 @@
     "Modified: / 24-12-1999 / 03:14:33 / cg"
     "Created: / 14-12-2010 / 21:31:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 15-12-2010 / 11:19:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 30-11-2011 / 22:07:48 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
+    "Modified: / 01-12-2011 / 17:44:35 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
 ! !
 
 !JavaVM class methodsFor:'helpers - awt'!