Mercurial Mercurial > hg > stx-libjava / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/JavaExceptionTests.st
branchjk_new_structure
changeset 1477 cc9bd91382a2
parent 1461 34a9c99d0295
child 1515 f4ebf5cf3f89 
--- a/src/JavaExceptionTests.st	Fri Apr 13 00:36:32 2012 +0000
+++ b/src/JavaExceptionTests.st	Fri Apr 13 10:03:19 2012 +0000
@@ -142,7 +142,9 @@
         caught := true.
     ].
 
-    self assert: caught == true
+    self assert: caught == true.
+    self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
+    self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
 
     "Created: / 18-03-2012 / 11:06:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
@@ -164,7 +166,9 @@
         caught := true.
     ].
 
-    self assert: caught == false
+    self assert: caught == false.
+    self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
+    self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
 
     "Created: / 18-03-2012 / 21:49:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
@@ -186,7 +190,9 @@
         caught := true.
     ].
 
-    self assert: caught == true
+    self assert: caught == true.
+    self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
+    self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
 
     "Created: / 18-03-2012 / 22:11:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
@@ -212,7 +218,9 @@
         caught := 123.
     ].
 
-    self assert: caught == 123
+    self assert: caught == 123.
+    self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
+    self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
 
     "Created: / 18-03-2012 / 22:12:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
@@ -234,7 +242,9 @@
         caught := true.
     ].
 
-    self assert: caught == true
+    self assert: caught == true.
+    self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
+    self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
 
     "Created: / 03-04-2012 / 14:44:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
@@ -259,6 +269,8 @@
 
     self assert: caught == true.
     self assert: (thrower instVarNamed: #token) == 3.
+    self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
+    self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
 
     "Created: / 03-04-2012 / 15:39:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
@@ -282,6 +294,8 @@
 
     self assert: caught == true.
     self assert: (thrower instVarNamed: #token) == 3.
+    self assert: (JavaVM enteredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
+    self assert: (JavaVM acquiredMonitorsOfProcess: Processor activeProcess) isEmptyOrNil.
 
     "Created: / 03-04-2012 / 17:30:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
hg/stx-libjava