projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Actually implement the new procedure code and adapt all of its clients
[pspp]
/
src
/
language
/
dictionary
/
sys-file-info.c
diff --git
a/src/language/dictionary/sys-file-info.c
b/src/language/dictionary/sys-file-info.c
index ec93ea201cfc3db974284194b86a387810fa2321..180188abd285ebae3c12d457f4f46fe1eb31d102 100644
(file)
--- a/
src/language/dictionary/sys-file-info.c
+++ b/
src/language/dictionary/sys-file-info.c
@@
-21,6
+21,7
@@
#include <ctype.h>
#include <stdlib.h>
#include <ctype.h>
#include <stdlib.h>
+#include <data/casereader.h>
#include <data/dictionary.h>
#include <data/file-handle-def.h>
#include <data/format.h>
#include <data/dictionary.h>
#include <data/file-handle-def.h>
#include <data/format.h>
@@
-87,7
+88,7
@@
cmd_sysfile_info (struct lexer *lexer, struct dataset *ds UNUSED)
struct file_handle *h;
struct dictionary *d;
struct tab_table *t;
struct file_handle *h;
struct dictionary *d;
struct tab_table *t;
- struct
sfm_
reader *reader;
+ struct
case
reader *reader;
struct sfm_read_info info;
int r, nr;
int i;
struct sfm_read_info info;
int r, nr;
int i;
@@
-102,7
+103,7
@@
cmd_sysfile_info (struct lexer *lexer, struct dataset *ds UNUSED)
reader = sfm_open_reader (h, &d, &info);
if (!reader)
return CMD_FAILURE;
reader = sfm_open_reader (h, &d, &info);
if (!reader)
return CMD_FAILURE;
-
sfm_close_reader
(reader);
+
casereader_destroy
(reader);
t = tab_create (2, 10, 0);
tab_vline (t, TAL_GAP, 1, 0, 8);
t = tab_create (2, 10, 0);
tab_vline (t, TAL_GAP, 1, 0, 8);