X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flibpspp%2Fext-array.c;h=57ff8e4a7d6225e3b56c9b71c0760e6e9570f635;hb=089161cdd3775ea7fbcad894f4957e98ec120de5;hp=68bbe954f38768d80d48a9c1f90ae71873daf086;hpb=fe8dc2171009e90d2335f159d05f7e6660e24780;p=pspp

diff --git a/src/libpspp/ext-array.c b/src/libpspp/ext-array.c
index 68bbe954f3..57ff8e4a7d 100644
--- a/src/libpspp/ext-array.c
+++ b/src/libpspp/ext-array.c
@@ -69,7 +69,7 @@ ext_array_destroy (struct ext_array *ea)
     {
       ok = !ext_array_error (ea);
       if (ea->file != NULL)
-        fclose (ea->file);
+        close_temp_file (ea->file);
       free (ea);
     }
   return ok;