JavaEmbeddedFrameView.st
changeset 311 b23c5e132b8c
parent 303 0b95d5f40bf2
child 318 8720093188f7
--- a/JavaEmbeddedFrameView.st	Thu Feb 05 11:03:48 1998 +0000
+++ b/JavaEmbeddedFrameView.st	Thu Feb 05 11:10:33 1998 +0000
@@ -230,7 +230,7 @@
 !
 
 stopApplet
-    |n|
+    |n n2|
 
     (appletThread notNil 
     and:[appletThread isDead not])ifTrue:[
@@ -247,6 +247,7 @@
         "/ give it a chance to stop ...
         "/
         Processor yield.
+        n2 := 0.
         [appletThread isDead] whileFalse:[
             n := 0.
             [n < 10 and:[appletThread isDead not]] whileTrue:[
@@ -254,14 +255,19 @@
                 n := n + 1.
             ].
             appletThread isDead ifFalse:[
-                Transcript showCR:'EmbeddedAppletFrame [info]: JAVA thread did not stop - shooting down ...'.
+                Transcript showCR:'EmbeddedAppletFrame [info]: JAVA thread did not stop - soft terminate ...'.
                 appletThread terminate.
+                n2 := n2 + 1.
+                n2 > 10 ifTrue:[
+                    Transcript showCR:'EmbeddedAppletFrame [info]: JAVA thread did not stop - shooting down ...'.
+                    appletThread terminateNoSignal
+                ]
             ].
         ].
     ].
     appletThread := nil
 
-    "Modified: / 29.1.1998 / 15:27:30 / cg"
+    "Modified: / 5.2.1998 / 12:10:01 / cg"
 ! !
 
 !JavaEmbeddedFrameView methodsFor:'initialize / release'!
@@ -418,5 +424,5 @@
 !JavaEmbeddedFrameView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaEmbeddedFrameView.st,v 1.5 1998/02/01 18:16:06 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaEmbeddedFrameView.st,v 1.6 1998/02/05 11:10:33 cg Exp $'
 ! !