Bug #1344508, Fix UNIX mmap leaking file descriptors. Will backport.

diff --git a/Misc/NEWS b/Misc/NEWS
index e88311f8ed82d3cddc2e4164d4f09c285ea99113..9b3f3814bda1c1f35604c9eef8014dba8129d699 100644 (file)
--- a/Misc/NEWS
+++ b/Misc/NEWS
@@ -177,6 +177,8 @@ Core and builtins
 Extension Modules
 -----------------
 
+- Bug #1344508, Fix UNIX mmap leaking file descriptors
+
 - Patch #1338314, Bug #1336623: fix tarfile so it can extract
   REGTYPE directories from tarfiles written by old programs.
 

diff --git a/Modules/mmapmodule.c b/Modules/mmapmodule.c
index dd7c16f8a6852b0d3791b96608c8afe8bf919560..73797cb5fe28e9b7312cba31f3bfb0c36398f7c8 100644 (file)
--- a/Modules/mmapmodule.c
+++ b/Modules/mmapmodule.c
@@ -99,6 +99,7 @@ mmap_object_dealloc(mmap_object *m_obj)
 #endif /* MS_WINDOWS */
 
 #ifdef UNIX
+       close(m_obj->fd);
        if (m_obj->data!=NULL) {
                msync(m_obj->data, m_obj->size, MS_SYNC);
                munmap(m_obj->data, m_obj->size);