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

2001-02-09 12:10 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>

Browse Source
This commit is contained in:
Alexander S.Kresin
2001-02-09 09:10:52 +00:00
parent 08077305f4
commit 7d4e86ceba
2 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -1,3 +1,7 @@
2001-02-09 12:10 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>
* harbour/source/rdd/dbfntx/dbfntx1.c
* bug fixed, which have appeared after last change
2001-02-09 09:15 GMT+1 Maurilio Longo <maurilio.longo@libero.it>
* source/debug/Makefile
+ added dbgwa.prg to GCC Makefile

2
harbour/source/rdd/dbfntx/dbfntx1.c
View File

@@ -1474,7 +1474,6 @@ static ERRCODE hb_ntxHeaderLoad( LPNTXINDEX pIndex , char *ITN)
ULONG ulPos;
ulPos = hb_fsSeek( pIndex->DiskFile, 0, SEEK_END );
pTag->TagBlock = ulPos/1024;
hb_fsSeek( pIndex->DiskFile , 0 , 0 );
if( hb_fsRead( pIndex->DiskFile,(BYTE*)&Header,sizeof(NTXHEADER)) != sizeof(NTXHEADER) )
@@ -1488,6 +1487,7 @@ static ERRCODE hb_ntxHeaderLoad( LPNTXINDEX pIndex , char *ITN)
memset( pTag, 0, sizeof( TAGINFO ) );
pIndex->CompoundTag = pTag;
pIndex->NextAvail = Header.next_page;
pTag->TagBlock = ulPos/1024;
pTag->RootBlock = Header.root;
pTag->TagName = (char *) hb_xgrab( strlen( ITN ) + 1 );
hb_strncpyUpper( pTag->TagName, ITN, strlen( ITN ) );