fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

See ChangeLog entry 19990731-02:30 EDT David G. Holm <dholm@jsd-llc.com>

Browse Source
This commit is contained in:
David G. Holm
1999-07-31 06:46:32 +00:00
parent ab91d1c847
commit fa6841b0cb
2 changed files with 11 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -1,3 +1,9 @@
19990731-02:30 EDT David G. Holm <dholm@jsd-llc.com>
* source/hbpp/hbpplib.c
! ParseExpression() expects a null-terminated string.
! ParseExpression() returns the parsed input in the input
string, not in the output string.
19990731-06:50 CET Victor Szel <info@szelvesz.hu>
* include/extend.h
include/hbdefs.h

8
harbour/source/hbpp/hbpplib.c
View File

@@ -65,9 +65,11 @@ HARBOUR HB_PREPROCESS(void)
char *pOut = (char *)hb_xgrab(STR_SIZE);
char *ptr = pText;
int resParse;
int slen, resParse;
memcpy(pText, hb_parc(1), MIN(hb_parclen(1), STR_SIZE));
slen = MIN(hb_parclen(1), STR_SIZE - 1);
memcpy(pText, hb_parc(1), slen);
pText[slen] = 0; /* Preprocessor expects null-terminated string */
memset(pOut, 0, STR_SIZE);
SKIPTABSPACES( ptr );
@@ -77,7 +79,7 @@ HARBOUR HB_PREPROCESS(void)
// Some error here?
}
hb_retc(pOut);
hb_retc(pText); /* Preprocessor returns parsed line in input buffer */
hb_xfree(pText);
hb_xfree(pOut);