--- a/src/JavaVM.st	Wed Nov 16 13:29:09 2011 +0000
+++ b/src/JavaVM.st	Wed Nov 16 13:33:38 2011 +0000
@@ -2070,8 +2070,8 @@
     
     | deadProcesses |
     deadProcesses := IdentitySet new.
-    EnteredMonitorsPerProcess 
-        keysAndValuesDo: [
+    EnteredMonitorsPerProcess notNil ifTrue: [
+        EnteredMonitorsPerProcess keysAndValuesDo: [
             :p :monitors | 
             p isDead ifTrue: [
             self breakPoint:#mh.
@@ -2086,6 +2086,7 @@
                 deadProcesses add: p.
             ]
         ].
+        ].
     deadProcesses do: [:p | EnteredMonitorsPerProcess removeKey: p ].
 
     "
@@ -2093,7 +2094,7 @@
 
     "Created: / 08-01-1998 / 17:29:26 / cg"
     "Modified: / 14-09-2011 / 22:06:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 16-11-2011 / 14:26:19 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
+    "Modified: / 16-11-2011 / 14:36:25 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
 !
 
 systemProperties