Issue #182: Added test jv
authorJan Vrany <jan.vrany@fit.cvut.cz>
Fri, 20 Oct 2017 22:47:34 +0100
branchjv
changeset 1958 fadec117e77d
parent 1957 91005025501a
child 1959 d05ea54888ee
Issue #182: Added test https://swing.fit.cvut.cz/projects/stx-jv/ticket/182
RegressionTests__VMCrashTests.st
--- a/RegressionTests__VMCrashTests.st	Thu Oct 05 22:31:06 2017 +0100
+++ b/RegressionTests__VMCrashTests.st	Fri Oct 20 22:47:34 2017 +0100
@@ -42,6 +42,43 @@
     "Created: / 09-08-2017 / 10:00:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
+test_issue_182_crash_when_java_is_flushed
+    <timeout: 300> "300min" 
+    <spawn: true>
+
+    "
+    If some code is still running when Java is flushed the
+    VM crashed.
+    "
+
+    | blocker iters |
+
+    Smalltalk loadPackage:'stx:libjava/tests'.  
+
+    blocker := Semaphore new.
+    JavaVM reboot.
+    
+    [ 
+        [
+            | issue182 |
+
+            issue182 := JAVA stx libjava tests mocks Issue182 new.
+            issue182 loopFor: 15.
+        ] on: JavaClassFormatError do:[
+            "/ This is expected
+        ] on: Error do:[:ex | 
+            ex suspendedContext fullPrintAllOn: Stdout.
+        ].
+        blocker signal.
+    ] fork.
+    Delay waitForSeconds: 5.
+    JAVA stx libjava tests mocks Issue182 constantPool atAllPut: nil.
+    blocker wait.
+
+    "Created: / 19-10-2017 / 19:55:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 26-10-2017 / 11:51:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 test_issue_64_vm_crashes_in_fclose
     "
     Quickly opening and closing files for long enough used to kill the
@@ -212,3 +249,4 @@
 
     ^ '$Changeset: <not expanded> $'
 ! !
+