X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdata%2Fscratch-writer.c;h=13ccee8c6f0aef698c2542ca495dbf4280bf5677;hb=57b436a22d9ae0e395fb2e3ce101c2b5c2e6939e;hp=4802f4b20363b5f946660e6c920c10631fbb89b8;hpb=755ecfd2e8d86bc134fe7202c46fee354ec166d0;p=pspp-builds.git

diff --git a/src/data/scratch-writer.c b/src/data/scratch-writer.c
index 4802f4b2..13ccee8c 100644
--- a/src/data/scratch-writer.c
+++ b/src/data/scratch-writer.c
@@ -22,6 +22,7 @@
 #include <stdlib.h>
 #include "case.h"
 #include "casefile.h"
+#include "fastfile.h"
 #include "dictionary.h"
 #include "file-handle-def.h"
 #include "scratch-handle.h"
@@ -72,7 +73,7 @@ scratch_writer_open (struct file_handle *fh,
   /* Create new contents. */
   sh = xmalloc (sizeof *sh);
   sh->dictionary = scratch_dict;
-  sh->casefile = casefile_create (dict_get_next_value_idx (sh->dictionary));
+  sh->casefile = fastfile_create (dict_get_next_value_idx (sh->dictionary));
 
   /* Create writer. */
   writer = xmalloc (sizeof *writer);
@@ -115,7 +116,6 @@ scratch_writer_close (struct scratch_writer *writer)
 {
   struct casefile *cf = writer->handle->casefile;
   bool ok = casefile_error (cf);
-  casefile_mode_reader (cf);
   fh_close (writer->fh, "scratch file", "we");
   free (writer);
   return ok;