From 908d2fc46ca596ab98630ab354890d0fa081053a Mon Sep 17 00:00:00 2001 From: "David G. Holm" Date: Mon, 17 Feb 2003 18:14:47 +0000 Subject: [PATCH] See ChangeLog entry 2003-02-17 13:15 UTC-0500 David G. Holm --- harbour/ChangeLog | 6 ++++++ harbour/source/rtl/dbdelim.prg | 6 ++++-- 2 files changed, 10 insertions(+), 2 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 05201f86ff..3c23f0eb6f 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,12 @@ 2002-12-01 23:12 UTC+0100 Foo Bar */ +2003-02-17 13:15 UTC-0500 David G. Holm + * source/rtl/dbdelim.c + ! Bug fix for EOL handling when using large import files, + provided by the author of the dbdelim append from code, + Marco Braida + 2003-02-15 11:00 UTC+0100 Tomaz Zupan * config/linux/global.cf - removed PRG_USR directive, because it is no longer needed diff --git a/harbour/source/rtl/dbdelim.prg b/harbour/source/rtl/dbdelim.prg index 1c2c53d529..edfa72309f 100644 --- a/harbour/source/rtl/dbdelim.prg +++ b/harbour/source/rtl/dbdelim.prg @@ -240,8 +240,10 @@ local lcisonoeol // fill the buffer cByte:=space(nDimBuff) fread(handle,@cByte,nDimBuff) - //we test the last position of the last eol +1 in this buffer - nPoslastEol+=rat(cCharEol,cByte)+1 + // with +1 there is a problem on large import of data + // for now we keep it remmed + // please test and test and test + nPoslastEol+=rat(cCharEol,cByte) // +1 //do this if in the buffer there are eol char lcisonoeol:=.t. do while lcisonoeol