19991011-23:54 GMT+1
This commit is contained in:
@@ -1,3 +1,10 @@
|
||||
19991011-23:54 GMT+1 Victor Szel <info@szelvesz.hu>
|
||||
* source/rtl/fm.c
|
||||
+ Newline readded to the closing //INFO message ;)
|
||||
* source/rdd/dbfcdx/dbfcdx1.prg
|
||||
- Removed the Inithandler/LockErrHandler since they are not there in
|
||||
Clipper.
|
||||
|
||||
19991011-14:20 EDT David G. Holm <dholm@jsd-llc.com>
|
||||
|
||||
* source/rtl/set.c
|
||||
|
||||
@@ -46,18 +46,3 @@ init procedure DBFCDXInit
|
||||
rddRegister( "DBFCDX", RDT_FULL )
|
||||
|
||||
return
|
||||
|
||||
init procedure InitHandler
|
||||
|
||||
local bOldError := ErrorBlock( { | oError | LockErrHandler( oError, bOldError ) } )
|
||||
|
||||
return
|
||||
|
||||
static function LockErrHandler( oError, bOldError )
|
||||
|
||||
if oError:gencode() == EG_LOCK
|
||||
return .T.
|
||||
endif
|
||||
|
||||
return Eval( bOldError, oError )
|
||||
|
||||
|
||||
@@ -163,6 +163,7 @@ void hb_xexit( void ) /* Deinitialize fixed memory subsystem */
|
||||
{
|
||||
char buffer[ 100 ];
|
||||
|
||||
hb_outerr( hb_consoleGetNewLine(), 0 );
|
||||
hb_outerr( "----------------------------------------", 0 );
|
||||
hb_outerr( hb_consoleGetNewLine(), 0 );
|
||||
sprintf( buffer, "Total memory allocated: %ld bytes (%lu blocks)", s_ulMemoryMaxConsumed, s_ulMemoryMaxBlocks );
|
||||
|
||||
Reference in New Issue
Block a user