Implemented data-store using a casefile instead of an array of cases.

[pspp-builds.git] / src / data / casefile.c

diff --git a/src/data/casefile.c b/src/data/casefile.c
index 453fbf09da4a5af8f6a9effe85aeb3fe9d4fbad2..7681a65f9d4e3e33b1c272760ed33ea0bc78e621 100644 (file)
--- a/src/data/casefile.c
+++ b/src/data/casefile.c
@@ -545,8 +545,14 @@ casefile_get_reader (const struct casefile *cf_)
 struct casereader *
 casefile_get_random_reader (const struct casefile *cf) 
 {
-  struct casereader *reader = casefile_get_reader (cf);
+  struct casefile  *mutable_casefile = (struct casefile*) cf;
+  struct casereader *reader;
+
+  enum { WRITE, READ } mode = cf->mode ;
+  reader = casefile_get_reader (cf);
   reader->random = true;
+  mutable_casefile->mode = mode;
+  
   return reader;
 }