projects
/
pspp-builds.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
aacb81b
)
(does_dict_need_translation) Fix bug: inverted return value (!).
author
Ben Pfaff
<blp@gnu.org>
Sat, 6 May 2006 21:26:48 +0000
(21:26 +0000)
committer
Ben Pfaff
<blp@gnu.org>
Sat, 6 May 2006 21:26:48 +0000
(21:26 +0000)
src/data/ChangeLog
patch
|
blob
|
history
src/data/sys-file-writer.c
patch
|
blob
|
history
diff --git
a/src/data/ChangeLog
b/src/data/ChangeLog
index 92520a1c757dd9c602594ea63c81f5eae049b2aa..c643a2eb2dd05499c8d330a6178ce5c70829bd3a 100644
(file)
--- a/
src/data/ChangeLog
+++ b/
src/data/ChangeLog
@@
-1,3
+1,8
@@
+Sat May 6 14:25:49 2006 Ben Pfaff <blp@gnu.org>
+
+ * sys-file-writer.c: (does_dict_need_translation) Fix bug:
+ inverted return value (!).
+
Sat May 6 13:37:52 2006 Ben Pfaff <blp@gnu.org>
Continue reforming procedure execution.
Sat May 6 13:37:52 2006 Ben Pfaff <blp@gnu.org>
Continue reforming procedure execution.
diff --git
a/src/data/sys-file-writer.c
b/src/data/sys-file-writer.c
index 89a513d03b6539b6bd6dbd1d2fd588a35b314e67..fe2c27c8102c71f23852d9d9ada4abd44b78f2b4 100644
(file)
--- a/
src/data/sys-file-writer.c
+++ b/
src/data/sys-file-writer.c
@@
-328,6
+328,10
@@
sfm_open_writer (struct file_handle *fh, struct dictionary *d,
goto error;
}
goto error;
}
+/* Returns zero if dictionary D's cases are ordered in the
+ natural manner, with the first variable followed by the
+ second, and so on,
+ nonzero otherwise. */
static int
does_dict_need_translation (const struct dictionary *d)
{
static int
does_dict_need_translation (const struct dictionary *d)
{
@@
-339,10
+343,10
@@
does_dict_need_translation (const struct dictionary *d)
{
struct variable *v = dict_get_var (d, i);
if (v->fv != case_idx)
{
struct variable *v = dict_get_var (d, i);
if (v->fv != case_idx)
- return
0
;
+ return
1
;
case_idx += v->nv;
}
case_idx += v->nv;
}
- return
1
;
+ return
0
;
}
/* Returns value of X truncated to two least-significant digits. */
}
/* Returns value of X truncated to two least-significant digits. */