chiark / gitweb /
quine.c: Fix double-close bug.
[quine] / quine.c
diff --git a/quine.c b/quine.c
index 3d3c35b6b68b73311b888dab52493f93995d139d..c7331428218d42456d2f0dd223272f66d97e6970 100644 (file)
--- a/quine.c
+++ b/quine.c
@@ -263,7 +263,6 @@ static void quine__doFile(FILE *fp, FILE *ifp)
     }
     fputs("\",\n", fp);
   }
-  fclose(ifp);
 
   fputs("0\n};\n\n", fp);
 }