+ sfm_write_case (t->f, t->case_buf, p - t->case_buf);
+}
+
+static int
+save_write_case_func (struct ccase * c, void *aux UNUSED)
+{
+ do_write_case (aux, c);
+ return 1;
+}
+
+static int
+save_trns_proc (struct trns_header *h, struct ccase * c)
+{
+ struct save_trns *t = (struct save_trns *) h;
+ do_write_case (t, c);