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

zero ended string added

Browse Source
This commit is contained in:
Antonio Linares
2002-01-31 11:19:42 +00:00
parent 5e244da169
commit 1e933fbb6b
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/source/rtl/memoline.c
View File

@@ -154,7 +154,7 @@ HB_FUNC( MEMOLINE )
if( ulPos < ulLen || (ulLineNumber == ulLines && ulLineEnd >= ulLineBegin) )
{
ULONG ulSpAdded = 0;
char * pszLine = ( char * ) hb_xgrab( ulLineLength );
char * pszLine = ( char * ) hb_xgrab( ulLineLength + 1 );
memset( pszLine, ' ', ulLineLength );
@@ -171,9 +171,10 @@ HB_FUNC( MEMOLINE )
}
pszLine[ ulLineLength ] = '\0';
hb_retclen_buffer( pszLine, ulLineLength );
}
else
hb_retc( NULL );
}