src/JavaVM.st
branchjk_new_structure
changeset 1551 2af2aa41bddb
parent 1550 fde50161f2b4
child 1552 89c63e6303f1
--- a/src/JavaVM.st	Tue Jul 24 10:22:56 2012 +0000
+++ b/src/JavaVM.st	Tue Jul 24 14:37:07 2012 +0000
@@ -1922,7 +1922,7 @@
     self initializeSystemClassLoader.
     ObjectMemory addDependent: self.
     StartupTime := OperatingSystem getOSTime.
-
+    FinalizationLobby startFinalizationProcessAt: 5.
 
 
     "
@@ -1934,7 +1934,7 @@
     "Modified: / 15-10-2010 / 15:27:45 / Jan Kurs <kurs.jan@post.cz>"
     "Modified: / 24-02-2012 / 13:59:29 / Marcel Hlopko <hlopik@gmail.com>"
     "Modified: / 24-02-2012 / 14:37:06 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
-    "Modified: / 24-07-2012 / 02:44:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified (format): / 24-07-2012 / 15:31:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 initializeVMIfNoEventThreadRunning
@@ -4438,8 +4438,13 @@
     retry := false.
     [ stream := aBlock value ] on:OpenError do:[:ex|
         (ex errorCode) == (OperatingSystem errorNumberFor:#EMFILE) ifTrue:[
-            ObjectMemory garbageCollect.
-            retry := true.
+            [
+                FinalizationLobby finalizeNow.
+                ObjectMemory garbageCollect.
+                retry := true.
+            ] on: Error do:[:ex|
+                Logger log: 'Failed to force finalization: ', ex description severity: #error facility: #JVM
+            ].
         ] ifFalse:[
             ex pass.
         ].