src/JavaContext.st
branchjk_new_structure
changeset 1096 c543f127c67a
parent 1095 6d0bfccd9ae7
child 1097 41def5679e28
--- a/src/JavaContext.st	Tue Nov 08 15:04:43 2011 +0000
+++ b/src/JavaContext.st	Tue Nov 08 15:25:04 2011 +0000
@@ -363,17 +363,18 @@
     "Created: / 08-11-2011 / 12:23:18 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
 !
 
-acquiredMonitorsDo: aBlock
-    acqrMonitors isNil ifTrue: [acqrMonitors := OrderedCollection new].
-    acqrMonitors do: aBlock.
+acquiredMonitorsDo: aBlock 
+    acqrMonitors isNil ifTrue: [ acqrMonitors := OrderedCollection new ].
+    acqrMonitors reverseDo: aBlock.
 
     "Created: / 08-11-2011 / 15:03:31 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
 !
 
 addMonitor: mon 
-Logger log:'adding monitor for ' , mon printString
-severity: #info
-facility: #JVM.
+    Logger 
+        log: 'adding monitor'
+        severity: #info
+        facility: #JVM.
     acqrMonitors ifNil: [ acqrMonitors := OrderedCollection new ].
     acqrMonitors add: mon.
 
@@ -388,9 +389,10 @@
 !
 
 removeMonitor: mon 
-Logger log:'removing monitor for ' , mon printString
-severity: #info
-facility: #JVM.
+    Logger 
+        log: 'removing monitor'
+        severity: #info
+        facility: #JVM.
     acqrMonitors isNil ifTrue: [
         'accessing nil acqrmonitors in monexit' infoPrintCR
     ] ifFalse: [