Fix FILE leak

Coverity 1147011

diff --git a/testsuite/compile_parse.c b/testsuite/compile_parse.c
index 59b144ffd6d0a841149bc7a4ffdf20434d348bd3..572b68169791c1572ac1cee8be0b36c65ce6761b 100644 (file)
--- a/testsuite/compile_parse.c
+++ b/testsuite/compile_parse.c
@@ -84,6 +84,7 @@ read_file (const char *filename)
   if (ret < 0) goto bail;
 
   contents[size] = 0;
+  fclose (file);
 
   return contents;
 bail: