2008-10-20 00:25 UTC+0200 Francesco Saverio Giudice (info fsgiudice com)

* contrib/hbdbgfx
    * contrib/hbdbgfx/dbgfxc.c
    * contrib/hbdbgfx/dbgfxc.prg
    * contrib/hbdbgfx/hbdbgfx.h
      * updated copyright year
        minor corrections
This commit is contained in:
Francesco Saverio Giudice
2008-10-19 22:26:35 +00:00
parent 9f77350dcc
commit 596c42212c
4 changed files with 14 additions and 18 deletions

View File

@@ -8,6 +8,14 @@
2008-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
*/
2008-10-20 00:25 UTC+0200 Francesco Saverio Giudice (info fsgiudice com)
* contrib/hbdbgfx
* contrib/hbdbgfx/dbgfxc.c
* contrib/hbdbgfx/dbgfxc.prg
* contrib/hbdbgfx/hbdbgfx.h
* updated copyright year
minor corrections
2008-10-20 00:15 UTC+0200 Francesco Saverio Giudice (info fsgiudice com)
+ contrib/hbdbgfx
+ contrib/hbdbgfx/dbgfxc.c

View File

@@ -7,7 +7,7 @@
* Harbour Project source code:
* Debug Functions
*
* Copyright 2007 Francesco Saverio Giudice <info / at /fsgiudice.com>
* Copyright 2007-2008 Francesco Saverio Giudice <info / at /fsgiudice.com>
* www - http://www.harbour-project.org
*
* This program is free software; you can redistribute it and/or modify
@@ -68,13 +68,9 @@ FUNCTION HB_ToOutDebugOnOff( lOnOff )
RETURN lOld
PROCEDURE HB_ToOutDebug( ... )
//LOCAL cString
IF !s_lToOutDebug
RETURN
IF s_lToOutDebug
hb_OutDebug( hb_sprintf( ... ) )
ENDIF
//cString := HB_ExecFromArray( "HB_SPRINTF", hb_aParams() )
hb_OutDebug( hb_sprintf( ... ) )
RETURN
FUNCTION HB_ToLogFileOnOff( lOnOff )
@@ -107,13 +103,11 @@ PROCEDURE HB_ToLogFile( cLogFile, ... )
ELSE
nHandle := FCreate( cLogFile )
s_lEmptyLogFile := FALSE
// Dopo che lo creato, lo richiudo immediatamente e lo riapro in modo condiviso
// nel caso arrivasse una nuova scrittura
// After I have create it I have to close and open in shared way
IF Ferror() == 0 .AND. nHandle > 0
FClose( nHandle )
nHandle := FOpen( cLogFile, FO_READWRITE + FO_SHARED)
ENDIF
//__OutDebug( "Create ", nHandle )
ENDIF
// Writing

View File

@@ -7,7 +7,7 @@
* Harbour Project source code:
* Debug Functions
*
* Copyright 2007 Francesco Saverio Giudice <info / at /fsgiudice.com>
* Copyright 2007-2008 Francesco Saverio Giudice <info / at /fsgiudice.com>
* www - http://www.harbour-project.org
*
* This program is free software; you can redistribute it and/or modify
@@ -57,10 +57,6 @@
#include "hbvm.h"
#include "item.api"
#ifndef __XHARBOUR__
#include "hbapicls.h"
#endif
static BOOL s_bToOutputDebug = TRUE;
static BOOL s_bToLogFile = TRUE;
@@ -75,8 +71,6 @@ HB_EXPORT BOOL hb_ToOutDebugOnOff( BOOL bOnOff )
HB_EXPORT void hb_ToOutDebug( const char * sTraceMsg, ... )
{
//BOOL bExec = TRUE; //FALSE;
if ( s_bToOutputDebug )
{
char buffer[ 1024 ];

View File

@@ -6,7 +6,7 @@
* Harbour Project source code:
* Header file for Debug Functions API
*
* Copyright 2007 Francesco Saverio Giudice <info / at /fsgiudice.com>
* Copyright 2007-2008 Francesco Saverio Giudice <info / at /fsgiudice.com>
* www - http://www.harbour-project.org
*
* This program is free software; you can redistribute it and/or modify