Please check https://github.com/synopse/mORMot2/rele … ite.3.35.4
and https://github.com/synopse/mORMot/commi … 4ef6f62add
there is one more sqlite release (3.35.4.) with a few fixes.
]]>And where can I read, what change in fpc was done?
Dunno. Its a FPC compiler error. Hard to isolate. Easy to work around.
]]>After changing the file name in mORMot to libdeflatepas.a, everything is also compiled without problems.
Great!
]]>I guess L_VV compiles with FPC trunk.
https://synopse.info/forum/viewtopic.ph … 542#p34542
Exactly, I compiled in the Lazarus / FPC trunk.
After replacement
if not Assigned(OnMatch) or
(not Assigned(KeyCompare) and
not Assigned(ValueCompare)) then
exit;
to
if not Assigned(OnMatch) or
(not (Assigned(KeyCompare) or
Assigned(ValueCompare))) then
exit;
everything was compiled successfully.
Thank you very much, AOG!
And where can I read, what change in fpc was done?
Arnaud, could it be possible to change this block in the mORMot2 trunk?
]]>@mpv
SQLITE_NO_THREAD was set because the beginthreadex/endthreadex redirections without libmsvcrt.a appeared to be buggy in mORMot 2...
But it may change the expected behavior of SQlite3, especially with FTS.
I will set it back to the previous behavior, and I guess we are fine too with mORMot 2.
@itSDS
For Delphi, we also use C++ Builder.
But here we speak about FPC, which uses gcc/mingw for Win32/Win64.
i compile my sqlite.obj sqlite.o with bcc32/64 from Rad Studio 10.4.2 and they work, is there a reason not to do this ?
]]>function TSynDictionary.ForEach(const OnMatch: TOnSynDictionary;
KeyCompare, ValueCompare: TDynArraySortCompare; const aKey, aValue;
Opaque: pointer): integer;
var
k, v: PAnsiChar;
i, n, ks, vs: PtrInt;
begin
fSafe.Lock;
try
result := 0;
if not Assigned(OnMatch) or
(not Assigned(KeyCompare) and <---
not Assigned(ValueCompare)) then <---
exit;
mormot.core.json.pas(9345,32) Error: Wrong number of parameters specified for call to "<Procedure Variable>"
mormot.core.json.pas(9346,34) Error: Wrong number of parameters specified for call to "<Procedure Variable>"
The .7z release should be downloaded again.
]]>