Coverity CID #168
leaked_storage: Returned without freeing storage "fp"
diff --git a/Modules/main.c b/Modules/main.c
index 3d4b9be..e6409e8 100644
--- a/Modules/main.c
+++ b/Modules/main.c
@@ -565,6 +565,7 @@
 				if (fstat(fileno(fp), &sb) == 0 &&
 				    S_ISDIR(sb.st_mode)) {
 					fprintf(stderr, "%s: '%s' is a directory, cannot continue\n", argv[0], filename);
+					fclose(fp);
 					return 1;
 				}
 			}