src/JavaVM.st
branchjk_new_structure
changeset 1552 89c63e6303f1
parent 1551 2af2aa41bddb
child 1553 ee3e63c04778
--- a/src/JavaVM.st	Tue Jul 24 14:37:07 2012 +0000
+++ b/src/JavaVM.st	Tue Jul 24 14:58:23 2012 +0000
@@ -4438,8 +4438,10 @@
     retry := false.
     [ stream := aBlock value ] on:OpenError do:[:ex|
         (ex errorCode) == (OperatingSystem errorNumberFor:#EMFILE) ifTrue:[
+            "Worst case, try to cleanup"
             [
                 FinalizationLobby finalizeNow.
+                Delay waitForSeconds: 5. "/Give Java finalization thread a chance to clean up
                 ObjectMemory garbageCollect.
                 retry := true.
             ] on: Error do:[:ex|