projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Made var_is_valid_name more permissive.
[pspp]
/
src
/
data
/
por-file-writer.c
diff --git
a/src/data/por-file-writer.c
b/src/data/por-file-writer.c
index fad89bf7682cbf77a0b7f6a8b270a4ee64c98ede..773969302ebcb9ddc3b06fea93aa1da6c66c313c 100644
(file)
--- a/
src/data/por-file-writer.c
+++ b/
src/data/por-file-writer.c
@@
-1,5
+1,5
@@
/* PSPP - a program for statistical analysis.
/* PSPP - a program for statistical analysis.
- Copyright (C) 1997-9, 2000, 2006 Free Software Foundation, Inc.
+ Copyright (C) 1997-9, 2000, 2006
, 2009
Free Software Foundation, Inc.
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
@@
-77,7
+77,7
@@
struct pfm_var
int fv; /* Starting case index. */
};
int fv; /* Starting case index. */
};
-static struct casewriter_class por_file_casewriter_class;
+static
const
struct casewriter_class por_file_casewriter_class;
static bool close_writer (struct pfm_writer *);
static void buf_write (struct pfm_writer *, const void *, size_t);
static bool close_writer (struct pfm_writer *);
static void buf_write (struct pfm_writer *, const void *, size_t);
@@
-463,7
+463,7
@@
por_file_casewriter_write (struct casewriter *writer, void *w_,
else
casewriter_force_error (writer);
else
casewriter_force_error (writer);
- case_
destroy
(c);
+ case_
unref
(c);
}
static void
}
static void
@@
-777,7
+777,7
@@
format_trig_double (long double value, int base_10_precision, char output[])
0...30**6, an invariant of the loop below. */
errno = 0;
base_2_sig = frexp (value, &base_2_exp);
0...30**6, an invariant of the loop below. */
errno = 0;
base_2_sig = frexp (value, &base_2_exp);
- if (errno != 0 || !finite (base_2_sig))
+ if (errno != 0 || !
is
finite (base_2_sig))
goto missing_value;
if (base_2_exp == 0 && base_2_sig == 0.)
goto zero;
goto missing_value;
if (base_2_exp == 0 && base_2_sig == 0.)
goto zero;
@@
-898,7
+898,7
@@
format_trig_double (long double value, int base_10_precision, char output[])
return;
}
\f
return;
}
\f
-static struct casewriter_class por_file_casewriter_class =
+static
const
struct casewriter_class por_file_casewriter_class =
{
por_file_casewriter_write,
por_file_casewriter_destroy,
{
por_file_casewriter_write,
por_file_casewriter_destroy,