2001-02-23 18:10 UTC+0300 Alex Shashkov <shashkov@ostu.ru>
* harbour/source/rtl/console.c
! Fixed bug STDOUT(..,"",..) on Watcom C 11.0
* harbour/source/pp/ppcore.c
* harbour/source/pp/pragma.c
! Fixed extern declaration for Watcom C 11.0
This commit is contained in:
@@ -1,3 +1,11 @@
|
||||
2001-02-24 18:10 UTC+0300 Alex Shashkov <shashkov@ostu.ru>
|
||||
* harbour/source/rtl/console.c
|
||||
! Fixed bug STDOUT(..,"",..) on Watcom C 11.0
|
||||
|
||||
* harbour/source/pp/ppcore.c
|
||||
* harbour/source/pp/pragma.c
|
||||
! Fixed extern declaration for Watcom C 11.0
|
||||
|
||||
2001-02-24 12:45 UTC+0300 Alex Shashkov <shashkov@ostu.ru>
|
||||
* harbour/source/vm/dynsym.c
|
||||
! Fixed
|
||||
|
||||
@@ -177,6 +177,11 @@ char * hb_pp_STD_CH = NULL;
|
||||
/* Ron Pinkas added 2000-11-21 */
|
||||
static BOOL s_bArray = FALSE;
|
||||
|
||||
#if defined(__WATCOMC__)
|
||||
extern BOOL hb_pp_bInline;
|
||||
extern int hb_pp_LastOutLine;
|
||||
#endif
|
||||
|
||||
/* Table with parse errors */
|
||||
char * hb_pp_szErrors[] =
|
||||
{
|
||||
@@ -2761,7 +2766,9 @@ static void pp_rQuotes( char * expreal, char * sQuotes )
|
||||
|
||||
int hb_pp_RdStr( FILE * handl_i, char * buffer, int maxlen, BOOL lDropSpaces, char * sBuffer, int * lenBuffer, int * iBuffer )
|
||||
{
|
||||
#ifndef __WATCOMC__
|
||||
extern BOOL hb_pp_bInline;
|
||||
#endif
|
||||
int readed = 0;
|
||||
int State = 0;
|
||||
char cha, cLast = '\0', symbLast = '\0';
|
||||
@@ -2949,7 +2956,9 @@ int hb_pp_RdStr( FILE * handl_i, char * buffer, int maxlen, BOOL lDropSpaces, ch
|
||||
|
||||
int hb_pp_WrStr( FILE * handl_o, char * buffer )
|
||||
{
|
||||
#ifndef __WATCOMC__
|
||||
extern int hb_pp_LastOutLine;
|
||||
#endif
|
||||
int lens = strlen(buffer);
|
||||
|
||||
HB_TRACE(HB_TR_DEBUG, ("hb_pp_WrStr(%p, %s)", handl_o, buffer));
|
||||
|
||||
@@ -50,6 +50,10 @@ static BOOL s_bTracePragma = FALSE;
|
||||
/* Size of abreviated pragma commands */
|
||||
#define PRAGMAS_LEN 8
|
||||
|
||||
#if defined(__WATCOMC__)
|
||||
extern BOOL hb_pp_bInline;
|
||||
#endif
|
||||
|
||||
/* TODO: Add support for:
|
||||
RequestLib /R
|
||||
*/
|
||||
@@ -173,7 +177,9 @@ void hb_pp_ParsePragma( char * szLine )
|
||||
{
|
||||
char sBuffer[ HB_PP_STR_SIZE ], *pBuffer, sDirective[9] ;
|
||||
int iSize;
|
||||
#ifndef __WATCOMC__
|
||||
extern BOOL hb_pp_bInline;
|
||||
#endif
|
||||
PINLINE pInline;
|
||||
|
||||
if( hb_comp_bPPO )
|
||||
|
||||
@@ -166,7 +166,8 @@ static void hb_conOut( USHORT uiParam, hb_out_func_typedef * pOutFunc )
|
||||
|
||||
pszString = hb_itemString( hb_param( uiParam, HB_IT_ANY ), &ulLen, &bFreeReq );
|
||||
|
||||
pOutFunc( pszString, ulLen );
|
||||
if ( ulLen )
|
||||
pOutFunc( pszString, ulLen );
|
||||
|
||||
if( bFreeReq )
|
||||
hb_xfree( pszString );
|
||||
|
||||
Reference in New Issue
Block a user