X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=tests%2Ftest-fflush.c;h=a6c0e18abb15f9f3a7336f9c3751eced75a0e129;hb=1fd8cad93b2ad72a6b8de912cf0e3630b98fe19c;hp=3c36ed901a32e19a7a2f18d4f307f858a75b3231;hpb=d599e5add275f75ed08e6527b8ee4d3f4f7c3aea;p=gnulib.git

diff --git a/tests/test-fflush.c b/tests/test-fflush.c
index 3c36ed901..a6c0e18ab 100644
--- a/tests/test-fflush.c
+++ b/tests/test-fflush.c
@@ -50,7 +50,8 @@ main (void)
   if (!f || 0 > fd || fread (buffer, 1, 5, f) != 5)
     {
       fputs ("Failed initial read of sample file.\n", stderr);
-      fclose (f);
+      if (f)
+        fclose (f);
       unlink ("test-fflush.txt");
       return 1;
     }