# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1375719520 -10800
# Node ID 416346c6dc748359103c7408e8584e87497a5269
# Parent  26741527f3b78c0460519a21148e3101875a71a1
Add fp handle check.

diff -r 26741527f3b7 -r 416346c6dc74 src/midifile.c
--- a/src/midifile.c	Mon Aug 05 19:18:15 2013 +0300
+++ b/src/midifile.c	Mon Aug 05 19:18:40 2013 +0300
@@ -438,6 +438,7 @@
             }
         }
 
+    if (fp != NULL)
         fclose(fp);
     }