Update of /cvsroot/q-lang/q-csv
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv9835
Modified Files:
csv.c
Log Message:
Fixed a bug when converting null fields.
Index: csv.c
===================================================================
RCS file: /cvsroot/q-lang/q-csv/csv.c,v
retrieving revision 1.17
retrieving revision 1.18
diff -C2 -d -r1.17 -r1.18
*** csv.c 11 Feb 2008 14:17:48 -0000 1.17
--- csv.c 29 Feb 2008 21:09:56 -0000 1.18
***************
*** 106,109 ****
--- 106,110 ----
char *p, *t;
+ printf("%d\n", (s[0]==0));
if (cvt_f) {
i = strtol(s, &p, 0);
***************
*** 197,203 ****
case 0:
fldp = fld;
n_fld = 0;
if (!strncmp(s, delimiter, n_delimiter)) {
- *fldp = 0;
putrec(CSV_QUOTE_ALL);
s += n_delimiter;
--- 198,204 ----
case 0:
fldp = fld;
+ *fldp = 0;
n_fld = 0;
if (!strncmp(s, delimiter, n_delimiter)) {
putrec(CSV_QUOTE_ALL);
s += n_delimiter;
|
