Отправлено: 30.09.11 14:29. Заголовок: dbRLock/dbRUnlock

Паша, потестил пример, вроде все разблокирует

C:\hrb\test\tt1\>test.exe

153 153
dbRLockList 0
Press any key to continue...

 Отправлено: 30.09.11 14:39. Заголовок: Странно, это у меня ..

Странно, это у меня со сборкой что-то ?

Использую самый что ни на есть официальный релиз Harbour 3.0:
2011-07-26 13:39 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Собирал Harbour конечно сам, но этот же баг проявляется и с mingw, и с bcc

 Отправлено: 30.09.11 14:41. Заголовок: Тоже сам собираю, во..

Тоже сам собираю, вот инфа

C:\hrb\test\tt1\>harbour -build
Harbour 3.1.0dev (Rev. 17053)
Copyright (c) 1999-2011, http://harbour-project.org/

Harbour Build Info
---------------------------
Version: Harbour 3.1.0dev (Rev. 17053)
Compiler: MinGW GNU C 4.6.1 (32-bit)
Platform: Windows XP 5.1.2600 Service Pack 3
PCode version: 0.3
ChangeLog last entry: 2011-09-27 20:06 UTC+0200 Viktor Szakats (harbour.01 syena
r.hu)
ChangeLog ID: ChangeLog 17053 2011-09-27 18:07:23Z vszakats
Built on: Sep 28 2011 09:05:39
Build options: (Clipper 5.3b) (Clipper 5.x undoc)
---------------------------

 Отправлено: 30.09.11 14:42. Заголовок: Да еще gcc C:\h..

Да еще gcc

C:\hrb\test\tt1\>gcc -v
Using built-in specs.
COLLECT_GCC=gcc
COLLECT_LTO_WRAPPER=c:/mingw32/bin/../libexec/gcc/mingw32/4.6.1/lto-wrapper.exe
Target: mingw32
Configured with: ../../src/gcc-4.6.1/configure --build=mingw32 --enable-language
s=c,c++,ada,fortran,objc,obj-c++ --enable-threads=win32 --enable-libgomp --enabl
e-lto --enable-fully-dynamic-string --enable-libstdcxx-debug --enable-version-sp
ecific-runtime-libs --with-gnu-ld --disable-nls --disable-win32-registry --disab
le-symvers --disable-werror --prefix=/mingw32tdm --with-local-prefix=/mingw32tdm
--enable-cxx-flags='-fno-function-sections -fno-data-sections' --with-pkgversio
n=tdm-1 --enable-sjlj-exceptions --with-bugurl=http://tdm-gcc.tdragon.net/bugs
Thread model: win32
gcc version 4.6.1 (tdm-1)

 Отправлено: 30.09.11 14:47. Заголовок: Нашел у себя Harbour..

Нашел у себя Harbour за март 2011 года

Баг проявляется

Собрал тест Harbour 2.0

Баг проявляется. Причем и на win7, и на winxp

С xHarbour бага нет

 Отправлено: 30.09.11 14:50. Заголовок: Проверил на другой м..

Проверил на другой машине, тоже баг вылез:

153 153
dbRLockList 0
Bad lock 2762
Bad lock 2763
Press any key to continue...


Harbour 3.1.0dev (Rev. 17024)
Copyright (c) 1999-2011, http://harbour-project.org/

Harbour Build Info
---------------------------
Version: Harbour 3.1.0dev (Rev. 17024)
Compiler: MinGW GNU C 4.5.2 (32-bit)
Platform: Windows 98 4.10.2222 A
PCode version: 0.3
ChangeLog last entry: 2011-08-29 22:38 UTC-0800 Pritpal Bedi (bedipritpal@hotmai
l.com)
ChangeLog ID: ChangeLog 17024 2011-08-30 05:39:18Z vouchcac
Built on: Aug 30 2011 10:44:30
Build options: (Clipper 5.3b) (Clipper 5.x undoc)
---------------------------


C:\dev\harbour9x\bin\>gcc
GCC.EXE: no input files

C:\dev\harbour9x\bin\>gcc -v
Reading specs from C:/MINGW/BIN/../lib/gcc/mingw32/3.4.5/specs
Configured with: ../gcc-3.4.5-20060117-3/configure --with-gcc --with-gnu-ld --wi
th-gnu-as --host=mingw32 --target=mingw32 --prefix=/mingw --enable-threads --dis
able-nls --enable-languages=c,c++,f77,ada,objc,java --disable-win32-registry --d
isable-shared --enable-sjlj-exceptions --enable-libgcj --disable-java-awt --with
out-x --enable-java-gc=boehm --disable-libgcj-debug --enable-interpreter --enabl
e-hash-synchronization --enable-libstdcxx-debug
Thread model: win32
gcc version 3.4.5 (mingw-vista special r3)

 Отправлено: 30.09.11 14:54. Заголовок: У меня gcc version 4..

У меня gcc version 4.5.2
mingw64 4.5.4 дает такой же баг
Но этот же баг есть и с bcc55
Хорошо, сейчас обновлюсь с SVN, соберу харбор и проверю
Хотя там в src\rdd никаких фиксов не было
Может быть, дело в mingw ? Не вопрос, возьму 4.6.1 (tdm-1)

 Отправлено: 30.09.11 14:56. Заголовок: AlexMyr пишет: 153 ..

AlexMyr пишет:

цитата:

153 153 dbRLockList 0 Bad lock 2762 Bad lock 2763 Press any key to continue...

Он, родимый

цитата:

Harbour 3.1.0dev (Rev. 17024) Copyright (c) 1999-2011, http://harbour-project.org/ Harbour Build Info --------------------------- Version: Harbour 3.1.0dev (Rev. 17024) Compiler: MinGW GNU C 4.5.2 (32-bit) Platform: Windows 98 4.10.2222 A PCode version: 0.3 ChangeLog last entry: 2011-08-29 22:38 UTC-0800 Pritpal Bedi (bedipritpal@hotmai l.com) ChangeLog ID: ChangeLog 17024 2011-08-30 05:39:18Z vouchcac Built on: Aug 30 2011 10:44:30 Build options: (Clipper 5.3b) (Clipper 5.x undoc) --------------------------- C:\dev\harbour9x\bin\>gcc GCC.EXE: no input files C:\dev\harbour9x\bin\>gcc -v Reading specs from C:/MINGW/BIN/../lib/gcc/mingw32/3.4.5/specs Configured with: ../gcc-3.4.5-20060117-3/configure --with-gcc --with-gnu-ld --wi th-gnu-as --host=mingw32 --target=mingw32 --prefix=/mingw --enable-threads --dis able-nls --enable-languages=c,c++,f77,ada,objc,java --disable-win32-registry --d isable-shared --enable-sjlj-exceptions --enable-libgcj --disable-java-awt --with out-x --enable-java-gc=boehm --disable-libgcj-debug --enable-interpreter --enabl e-hash-synchronization --enable-libstdcxx-debug Thread model: win32 gcc version 3.4.5 (mingw-vista special r3)

Дело в gcc, что ли ?

 Отправлено: 30.09.11 14:58. Заголовок: Про что это вы трёте..

Про что это вы трёте? Что за баг?

 Отправлено: 30.09.11 15:01. Заголовок: PSP пишет: Про что ..

PSP пишет:

цитата:

Про что это вы трёте? Что за баг?

Да так, беседуем

 Отправлено: 30.09.11 15:05. Заголовок: PSP пишет: Про что ..

PSP пишет:

цитата:

Про что это вы трёте? Что за баг?

Я написал в devlist, там есть вложение:

http://groups.google.com/group/harbour-devel/t/677c6478b7da5e96

Неприятная штука :(

 Отправлено: 30.09.11 15:35. Заголовок: Вот же ж... Есть так..

Вот же ж... Есть такое, да. :(
Harbour 3.0.0 и bcc 5.82

 Отправлено: 30.09.11 16:26. Заголовок: Сейчас взял другой d..

Сейчас взял другой dbf, с другим индексом. Отработало 5926 записей. Все нормально.

 Отправлено: 30.09.11 16:38. Заголовок: PSP пишет: Сейчас в..

PSP пишет:

цитата:

Сейчас взял другой dbf, с другим индексом. Отработало 5926 записей. Все нормально.

Ну да. В 99 случаях сработает, а в одном - нет. У меня тоже эта функция в большинстве случаев работает.
А в этом - оставляет запись блокированной. Причем она оказывается первой удаленной, на которую становится указатель при go top. А процедура добавления записи как раз использует удаленные, не может ее блокировать, и записи в таблицу не добавляются вообще.
Я, конечно, пока заменил эту функцию, переписал другими средствами, но, будем надеяться, баг устранят.

 Отправлено: 30.09.11 16:42. Заголовок: Pasha пишет: Ну да...

Pasha пишет:

цитата:

Ну да. В 99 случаях сработает, а в одном - нет.

Согласен. Не дело это...

цитата:

будем надеяться, баг устранят.

Будем. :)

 Отправлено: 30.09.11 18:32. Заголовок: PSP пишет: цитата..

PSP пишет:

цитата:

цитата: будем надеяться, баг устранят. Будем. :)

Оказывается, баг уже устранили.

2011-09-02 14:03 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/src/rtl/filebuf.c
! fixed GPF in file locking code.
Many thanks to Kultyshev Igor Anatolevich for reporting the bug
and locating exact reason of the problem.
[TOMERGE 3.0]

 Отправлено: 30.09.11 18:56. Заголовок: Pasha пишет: Оказыв..

Pasha пишет:

цитата:

Оказывается, баг уже устранили.

Упсссс... :)

 Отправлено: 03.10.11 09:12. Заголовок: TOMERGE 3.0 изменило..

TOMERGE 3.0 изменилось на MERGED 3.0
Przemyslaw Czerpak применил много исправлений к версии 3.0
Качайте, если кому надо. :)