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

2009-06-18 16:14 UTC+0600 April White (april@users.sourceforge.net)

Browse Source 
* source/rtl/mlcfunc.c
    * detect if parameter is a string vs array
    * allocate memory for the array before resetting the counter
This commit is contained in:
April White
2009-06-18 14:43:17 +00:00
parent 826ad777c2
commit 1050cd8fb2
2 changed files with 8 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -17,6 +17,11 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-06-18 16:14 UTC+0600 April White (april@users.sourceforge.net)
* source/rtl/mlcfunc.c
* detect if parameter is a string vs array
* allocate memory for the array before resetting the counter
2009-06-18 14:21 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* contrib/hbct/Makefile
- contrib/hbct/dattime4.c

6
harbour/source/rtl/mlcfunc.c
View File

@@ -166,9 +166,9 @@ static PHB_EOL_INFO hb_mlGetEOLs( int iParam, int * piEOLs )
char * szEOL;
ULONG ulLen, ul;
szEOL = hb_parc( iParam );
if( szEOL )
if( HB_ISCHAR( iParam ) )
{
szEOL = hb_parc( iParam );
ulLen = hb_parclen( iParam );
if( ulLen )
{
@@ -189,8 +189,8 @@ static PHB_EOL_INFO hb_mlGetEOLs( int iParam, int * piEOLs )
}
if( iEOLs )
{
iEOLs = 0;
pEOLs = ( PHB_EOL_INFO ) hb_xgrab( sizeof( HB_EOL_INFO ) * iEOLs );
iEOLs = 0;
for( ul = 1; ul <= ulSize; ++ul )
{
ulLen = hb_arrayGetCLen( pArray, ul );