JavaVM.st
changeset 3779 973f2396c750
parent 3777 971961e59d5e
child 3780 57bbc3e4d650
--- a/JavaVM.st	Fri Aug 11 22:37:56 2017 +0100
+++ b/JavaVM.st	Sat Aug 12 22:11:28 2017 +0100
@@ -4650,17 +4650,6 @@
     "Created: / 16-11-2011 / 15:37:58 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
 !
 
-exitOwnedMonitorsOfProcess
-   |thisProcess monitors|
-   thisProcess := Processor activeProcess.
-   monitors := self acquiredMonitorsOfProcess: thisProcess.
-   monitors do: [:each | self assert: (each isOwnedBy:thisProcess).
-    each exit.
-    ]
-
-    "Created: / 05-12-2011 / 21:15:54 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
-!
-
 has: aProcess enteredMonitorFor: anyObject
     ^ (self enteredMonitorsOfProcess: aProcess) includes: anyObject.
 
@@ -4755,26 +4744,6 @@
     "Modified: / 02-03-2015 / 13:59:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-monitorExit: someObject in: aJavaContext ifOwnedBy: aProcess
-    | monitor |
-    monitor := someObject getJavaMonitor.
-    (monitor isOwnedBy: aProcess) ifTrue: [
-        self monitorExit: someObject in: aJavaContext
-    ] ifFalse: [
-        MonitorTrace ifTrue: [
-            Logger
-                log: ('%1 trying to exit monitor for %2, but it does not own it. Ignoring'
-                        bindWith: aProcess name
-                        with: (self monitorFriendlyPrintStringOf: someObject))
-                severity: Logger severityDEBUG
-                facility: #JVM
-        ]
-    ].
-
-    "Created: / 17-11-2011 / 21:17:57 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
-    "Modified: / 02-03-2015 / 13:58:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
 monitorFriendlyPrintStringOf: someObject
     | objString |
     someObject isJavaClass ifTrue: [ objString := someObject name ] ifFalse: [