Re: [fpc-devel] Inserting first record

2011-06-09 Thread LacaK
. Michael. On Thu, 9 Jun 2011, LacaK wrote: May be like this ? Thanks. Laco. On Thu, 2011-06-09 at 11:49 +0200, LacaK wrote: Here is attached debug output with {$DEFINE DSDebug}. It seems, that exception is related to Append/Insert (it does not depend if dataset is empty before or not) followed by

[fpc-devel] fcl-db test suite

2011-06-16 Thread LacaK
Hi *, I am now playing with test suite for fcl-db. I encounter, that for every test in testfieldtypes.pas is repeatedly called InitialiseDBConnector in toolsunit.pas (because of procedure TTestFieldTypes.SetUp), which set-ups testValues and create instance of TSQLDBConnector (which creates ins

Re: [fpc-devel] divide bcd's

2011-06-17 Thread LacaK
Hi Joost, for me: 100/1=10 <--error 10/1=10 100/10=10 1000/1=10 <--error 1000/10=10 <--error 1000/100=10 100/2=50 1007/5=201.4 -Laco. Hi all, Dividing BCD's doesn't go wel: 100/1=10 100/2=overflow 1007/5=overflow It's all in this function in the FmtBCD unit: procedure BCDDivide ( const Div

Re: [fpc-devel] divide bcd's

2011-06-19 Thread LacaK
Hi Joost, try attached patch. For me it works as expected. -Laco. Maybe someone else can. If not, I think we should rewrite the whole function. Joost. --- fmtbcd.pp.ori Mon Jun 20 07:10:16 2011 +++ fmtbcd.pp Mon Jun 20 07:51:26 2011 @@ -2205,8 +2205,6 @@ writeln; bh1

Re: [fpc-devel] divide bcd's

2011-06-26 Thread LacaK
To not forget, I have reported it also in bug tracker http://bugs.freepascal.org/view.php?id=19636 -Laco. Hi Joost, try attached patch. For me it works as expected. -Laco. Maybe someone else can. If not, I think we should rewrite the whole function. Joost. --

Re: RE : RE : [fpc-devel] MySQL 5.1 and Double (trouble)

2011-07-12 Thread LacaK
May be, that this can be fixed in sqldb.pp in function TSQLConnection.GetAsSQLText(Param: TParam) : string; ... -ftFloat: Result := FloatToStr(Param.AsFloat, FSQLFormatSettings); +ftFloat: Result := FloatToStrF(extended(Param.AsFloat), ffGeneral, 16, 0, FSQLFormatSettings); ...

Re: [fpc-devel] MySQL 5.1 and Double (trouble)

2011-07-20 Thread LacaK
Andrew Brunner wrote / napísal(a): On Mon, Jul 11, 2011 at 3:02 AM, Mark Morgan Lloyd wrote: 1.) Update Value : 40734.825668912039 2.) Actual Value after update : 40734.8256689120 3.) Actual Value on read :40734.825668912003 Does MySQL come with an "of

[fpc-devel] negative TDateTime values and MinDateTime

2011-08-02 Thread LacaK
Hi , I have problem with comparing negative datetime values in fcl-db test suite (accessed as variants). It is related to VariantToDate function (in cvarutil.inc), where result is tested against MinDateTime. For example: v1 :=strtodatetime('01.01.0001 12:00:00'); v2 :=strtodatetime('01.01.0

Re: [fpc-devel] negative TDateTime values and MinDateTime

2011-08-02 Thread LacaK
Jonas Maebe wrote / napísal(a): On 02 Aug 2011, at 13:45, LacaK wrote: What do you think, can we change MinDateTime from -693593.0 to -693594.0; (to accept 01/01/0001 23:59:59.999) http://www.mail-archive.com/fpc-devel@lists.freepascal.org/msg07989.html Thanks, it seems, that Joost in

Re: [fpc-devel] negative TDateTime values and MinDateTime

2011-08-04 Thread LacaK
My favorite is the really natural one: Plank-time count since the Big Bang. Here supposedly we don't need negative values., Good joke! ;-))) (but nobody knows, when it was (how many mld. years ago) and many doubts, that it is real fact) -Laco. _

Re: [fpc-devel] negative TDateTime values and MinDateTime

2011-08-04 Thread LacaK
Felipe Monteiro de Carvalho wrote / napísal(a): On Wed, Aug 3, 2011 at 6:55 AM, LacaK wrote: So if this constant can not be changed, then I must write workaround for date '01/01/0001' and do not add time part to this date. The constant was already changed once, and no-one

Re: [fpc-devel] FPC 2.6.x branched, trunk becomes 2.7.1

2011-08-04 Thread LacaK
Is this "branching" somehow related to preparation of release some next version of FPC (2.5.x ? or so) ? I am asking because, there are waiting some bugs/features which I would be happy see fixed before any major release. Can I see somewhere on web some planed time schedule or anouncements about

Re: [fpc-devel] negative TDateTime values and MinDateTime

2011-08-04 Thread LacaK
100AD are already supported in FPC and no-one complayned about old databases in the last years since the change made by Joost. Lacak only asked to add 1 more day to our date limit. Exactly so! And MinDateTime is used only in these two conversions functions (to test if result value is

Re: [fpc-devel] FPC 2.6.x branched, trunk becomes 2.7.1

2011-08-04 Thread LacaK
I think there will be some RC1 or so in september. Ok, so there is enought time before. Can I post here list of registered bugs (fcl-db), which will be good commit ? (or you are busy with other task and I must be patient and wait ;-)) TIA -Laco. __

Re: [fpc-devel] FPC 2.6.x branched, trunk becomes 2.7.1

2011-08-04 Thread LacaK
Luiz Americo Pereira Camara wrote / napísal(a): On 4/8/2011 09:21, LacaK wrote: Is this "branching" somehow related to preparation of release some next version of FPC (2.5.x ? or so) ? I am asking because, there are waiting some bugs/features which I would be happy see fixed before

Re: [fpc-devel] FPC 2.6.x branched, trunk becomes 2.7.1

2011-08-04 Thread LacaK
Marco van de Voort wrote / napísal(a): (or you are busy with other task and I must be patient and wait ;-)) I only cherry pick the easy db bugs to get some load of Joost. Typically stuff where it is fairly clear what needs to be done, and no major design decisions on fcl-db are taken. (wh

Re: [fpc-devel] FPC 2.6.x branched, trunk becomes 2.7.1

2011-08-05 Thread LacaK
That's why we have snapshots. The main purpose of a release is to have something that is stable and which doesn't break previously working code (except in known cases documented at http://wiki.freepascal.org/User_Changes_Trunk ). Are there published some rules, what breakage is acceptable,

[fpc-devel] strcopy, strlcopy for PWideChar

2011-08-15 Thread LacaK
Hi, it seems, that there is ATM no versions of StrCopy, StrLCopy, which works with WideChars (in SysUtils). Can these variants be added ? function StrCopy(Dest: PWideChar; const Source: PWideChar): PWideChar; http://docwiki.embarcadero.com/VCL/en/SysUtils.StrCopy function StrLCopy(Dest: PWideC

Re: [fpc-devel] strcopy, strlcopy for PWideChar

2011-08-15 Thread LacaK
Michael Van Canneyt wrote / napísal(a): On Mon, 15 Aug 2011, LacaK wrote: Hi, it seems, that there is ATM no versions of StrCopy, StrLCopy, which works with WideChars (in SysUtils). Can these variants be added ? function StrCopy(Dest: PWideChar; const Source: PWideChar): PWideChar; http

Re: [fpc-devel] strcopy, strlcopy for PWideChar

2011-08-15 Thread LacaK
Hans-Peter Diettrich wrote / napísal(a): LacaK schrieb: Or do you not like these "wide" versions at all ? It's not a matter of liking, I'm afraid. If Delphi has them, we'll have to add them too :-) Can you please add an entry in the bug tracker, so

[fpc-devel] LoadLibrary and FPU control word

2011-08-17 Thread LacaK
Hi, I encounter strange thing. Look at this program please: var LibraryHandle: TLibHandle; cw: word; begin cw:=Get8087CW; writeln('CW before:',cw, ' IntPower:', intpower(10,-6)); LibraryHandle:=LoadLibrary('odbc32.dll'); writeln('CW after:',Get8087CW, ' IntPower:', intpower(10,-6)); Set808

Re: [fpc-devel] LoadLibrary and FPU control word

2011-08-17 Thread LacaK
Because of no response I registered it as bug http://bugs.freepascal.org/view.php?id=20011 Can you please look at least at this: Which compiler defines are OK ? "i386" or "cpui386" My test shows, that "i386" is NOT defined ("cpui386" IS defined), but then I do not understand how can it work in d

Re: [fpc-devel] LoadLibrary and FPU control word

2011-08-18 Thread LacaK
Thank you! Off-topic: It seems, that in my case (in ibase60.inc is used: "uses Dynlibs, sysutils,ctypes; ") function SafeLoadLibrary defined in SysUtils hides SafeLoadLibrary used in DynLibs, this is reason, why SafeLoadLibrary worked as expected. So is "i386" obsolete ? If yes there are othe

[fpc-devel] overloaded SetFieldData/GetFieldData

2011-08-19 Thread LacaK
Hi, I found this it fpc-pascal mailing list archive (I do not read this mailing list, so I do not catch this discussion) Because I think it is worth to continue, I move it into fpc-devel / ... I feel the definition />/ of SetFieldData/GetFieldData without a length/size parameter />/ and string

Re: [fpc-devel] strcopy, strlcopy for PWideChar

2011-08-23 Thread LacaK
Florian Klämpfl wrote / napísal(a): Am 16.08.2011 07:06, schrieb LacaK: Hans-Peter Diettrich wrote / napísal(a): LacaK schrieb: Or do you not like these "wide" versions at all ? It's not a matter of liking, I'm afraid. If Delphi has them, we

Re: [fpc-devel] odbcconn.pas

2014-03-13 Thread LacaK
thing appears to work fine, but as soon as the dataset refreshes my changes disappear. I can write to the same tables using INSERT, DELETE and UPDATE queries without issue. Do you use TSQLQuery.ApplyUpdates followed by TSQLTransaction.Commit or CommitRetaining ? -

Re: [fpc-devel] odbcconn.pas

2014-03-14 Thread LacaK
trols have nothing with it ;-) L. Thanks. Nathan T. Wild On Mar 13, 2014 9:57 AM, "LacaK" <mailto:la...@zoznam.sk>> wrote: Nathan Wild wrote / napísal(a): I have been transitioning my work over from Delphi to Lazarus. For the most part it h

Re: [fpc-devel] [fpc-pascal] overloading function

2014-05-06 Thread LacaK
Hi again, I reply also to fpc-devel list (excuse me, if it is off-topic), because I would like understand wat is going on. I attach also simple test program. I use FPC 2.6.4 but I think, that same happens also with fresh 2.7.1 Thanks -Laco. On 02.05.2014 07:45, LacaK wrote: Hi, I am trying

Re: [fpc-devel] [fpc-pascal] overloading function StrPLCopy

2014-05-07 Thread LacaK
n, I reply also to fpc-devel list (excuse me, if it is off-topic), because I would like understand wat is going on. I attach also simple test program. I use FPC 2.6.4 but I think, that same happens also with fresh 2.7.1 Thanks -Laco. On 02.05.2014 07:45, LacaK wrote: Hi, I am trying understa

[fpc-devel] Method for write string into TStream

2014-07-21 Thread LacaK
Hi, When I work with f.e. TFileStream I need often write string into stream. Now I use: Stream1.WriteBuffer(s[1], length(s)); I think, that for convenience it will be useful having something like: procedure TStream.WriteString(const s: string); begin WriteBuffer(s[1], length(s)*sizeof(char);

Re: [fpc-devel] Method for write string into TStream

2014-07-21 Thread LacaK
Sven Barth wrote / napísal(a): Am 21.07.2014 10:29 schrieb "LacaK" <mailto:la...@zoznam.sk>>: > > Hi, > When I work with f.e. TFileStream I need often write string into stream. > Now I use: > Stream1.WriteBuffer(s[1], length(s)); > > I think, that

Re: [fpc-devel] Method for write string into TStream

2014-07-21 Thread LacaK
Marco van de Voort wrote / napísal(a): In our previous episode, Michael Van Canneyt said: Nothing stops you though from writing a class helper that adds a WriteString method to TStream. Yes, I can create also own descendant etc. ... but I am asking for general solution, which will b

Re: [fpc-devel] Method for write string into TStream

2014-07-22 Thread LacaK
Recap: Way 1: Introduce new method(s), leave Write/ReadAnsiString as is. 1.1 procedure WriteRawString(const s: string); function ReadRawString(Len: integer) 1.2 (ready for future when string will be UnicodeString) procedure WriteString(const s: string); function ReadString(Len: integer) 1.3

Re: [fpc-devel] MS SQL tests: fix for string settings & invalid dates

2014-11-18 Thread LacaK
Hi, try set PacketRecords=-1 in your TSQLQuery -Laco. Hello, I am struggeling with Lazarus and a connection to MSSQL server 2005. I get the data, but when i change a fieldvalue, then apply updates, I get the error 20019 like you listed: http://lists.freepascal.org/fpc-devel/2014-March/03

[fpc-devel] Bug 0018702: Third call to a nested function variable returning a string gives unpredictable results

2015-03-11 Thread LacaK
Hi *, only for my interest: is there chance, that this bug will be solved ? ;-) Or is there any deep problem which makes solution hard and probalbly will be never solved. Thanks -Laco. ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://li

[fpc-devel] StrPLCopy with MaxLen=0

2015-05-14 Thread LacaK
Hi, When I run this simple program in Delphi: program bug_StrPLCopy; {$APPTYPE CONSOLE} uses SysUtils; var Buf: array[0..10] of Char; begin Buf[0] := 'A'; writeln(ord(Buf[0])); StrPLCopy(Buf, '', 0); writeln(ord(Buf[0])); readln; end

Re: [fpc-devel] StrPLCopy with MaxLen=0

2015-05-14 Thread LacaK
Dňa 14.5.2015 o 14:15 Michael Van Canneyt napísal(a): On Thu, 14 May 2015, LacaK wrote: Hi, When I run this simple program in Delphi: program bug_StrPLCopy; {$APPTYPE CONSOLE} uses SysUtils; var Buf: array[0..10] of Char; begin Buf[0

Re: [fpc-devel] FPC 3.0.0-rc1 release

2015-08-25 Thread LacaK
News and changes related to this release are described in whatsnew.txt. Free Pascal 3.0.0 is currently available for the following platforms: - Linux-i386 - Linux-x86_64 (amd64) - Linux-powerpc - Linux-sparc - Linux-ARM - Win32-i386 (Win95/98/Me/XP/2000/2003/Vista/7 and WinNT) Here is mention

[fpc-devel] MinCurrency

2015-11-18 Thread LacaK
Hi, When I run this on Win32 (FPC 2.6.4): == var c: currency; e: integer; begin c:=0; Val('-922337203685477.5808',c,e); Writeln('c=',c,' , e=',e); Writeln(StrToCurr('-922337203685477,5808')); end. =

Re: [fpc-devel] MinCurrency

2015-11-18 Thread LacaK
Hi, When I run this on Win32 (FPC 2.6.4): == var c: currency; e: integer; begin c:=0; Val('-922337203685477.5808',c,e); Writeln('c=',c,' , e=',e); Writeln(StrToCurr('-922337203685477,5808')); end. ===

Re: [fpc-devel] MinCurrency

2015-11-18 Thread LacaK
There is also related bug report: http://bugs.freepascal.org/view.php?id=28737 And look at part of code in rtl/objpas/sysutils/sysstrh.inc: 41 {$if defined(FPC_HAS_TYPE_EXTENDED) or defined(FPC_HAS_TYPE_FLOAT128)} 42 MinCurrency: Currency = -922337203685477.5807; 43 MaxCur

Re: [fpc-devel] MinCurrency

2015-11-18 Thread LacaK
Because for example on Win64/x86_64 target, there is not defined FPC_HAS_TYPE_EXTENDED, so I get "truncated values" FPC_HAS_TYPE_EXTENDED is undefined on most platforms. It's only a very small minority that has it, but of course those are the most used ones. And secondly why is MinCurrenc

[fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
Hi, investigating bug #29760 I reduced bug to: var c: currency; d: double; begin c := 123.45; d := 100; writeln(c, '*', d, '=', c*d); // result of multiply is wrong = 12345 end. This happens only on Win64 with FPC 3.0 Can somebody please check and confirm ? Thanks -Laco. __

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
This happens only on Win64 with FPC 3.0 Can somebody please check and confirm ? compiled with official Lazarus 1.6 (SVN revision as displayed in the about box: 51630) console output of your program is: 1.234500E+02* 1.E+002= 1.234500E+08

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
> > > Are there tests for compiler ? > Is it possible, that such bug is not noticed during preparation of release ? > (or is it such special case, that this was not covered by existing test?) There are many and they are run every night for quite some platforms. It could however be that this

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
Then that indeed applies for Win64 as well. Maybe time to start thinking about 3.0.2, then. This is not a minor bug. IMO it is serious bug and users should be informed, that upgrading to FPC 3.0 (on some platforms) can leads to serious problems when currency and double are involved. (but

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
> So wouldn't be better have less bigger test units for example "tcurrency" which will do complex testing for for example all math.operations with currency data type ? > (as opposed to have lot of fragments in lot of anonymous files) > Feel free to write such a test. See attached file. Is th

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
Dňa 11.3.2016 o 8:07 Ondrej Pokorny napísal(a): On 11.03.2016 7:58, LacaK wrote: Then that indeed applies for Win64 as well. Maybe time to start thinking about 3.0.2, then. This is not a minor bug. IMO it is serious bug and users should be informed, that upgrading to FPC 3.0 (on some

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-11 Thread LacaK
> So wouldn't be better have less bigger test units for example "tcurrency" which will do complex testing for for example all math.operations with currency data type ? > (as opposed to have lot of fragments in lot of anonymous files) > Feel free to write such a test. See attached file. Is

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-11 Thread LacaK
Dňa 11.3.2016 o 14:19 Jonas Maebe napísal(a): LacaK wrote: Updated file. If you find it useful add it please to "tests/test" and/or replace "tw28748.pp" (as it is subset of this) Or give mee feedback what should be changed, added or so. tests/test/cg/taddcurr.pp contains a

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-19 Thread LacaK
If you find it useful add it please to "tests/test" and/or replace "tw28748.pp" (as it is subset of this) Or give mee feedback what should be changed, added or so. tests/test/cg/taddcurr.pp contains already most of those tests in a systematic way. this test was added after FPC 3.0 release ?

[fpc-devel] Bug #29037 StrToCurr raises exception for MinCurrency value on Win64

2016-03-23 Thread LacaK
Hi *, can somebody please look at bug report #29037 and attached patch there ? Thanks -Laco. ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

Re: [fpc-devel] Bug #29037 StrToCurr raises exception for MinCurrency value on Win64

2016-03-30 Thread LacaK
Thank you. L. On Thu, 24 Mar 2016, LacaK wrote: Hi *, can somebody please look at bug report #29037 and attached patch there ? I am on it. Michael. ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/cgi-bin

Re: [fpc-devel] Improved inlining for generic specializations

2016-05-26 Thread LacaK
Thank you! Is it for FPC 3.2 only or can it be backported to 3.0 series (3.0.4 probably?) ? L. Hello together! For those that are interested: I've improved the inlining for specializations of generics so that now the bodies of specialized routines (no matter whether they are normal methods

Re: [fpc-devel] FPC V3.0.0 LocalTimeToUniversal() error

2016-06-28 Thread LacaK
Dňa 28.6.2016 o 9:18 Michael Van Canneyt napísal(a): On Tue, 28 Jun 2016, Russ Davies wrote: Hi, My local time zone is GMT +2, and have noticed that with V3.0.0, that the LocalTimeToUniversal() function is adding the offset instead of subtracting it: uses sysutils, dateutils; var Local

[fpc-devel] Bug in passing WideString parameters to dispinterface function ?

2016-10-24 Thread LacaK
Hi, look please at this. I have imported OCX type library which result in pascal unit with "dispinterface" defined like this: _DSamlight_client_ctrl_ocx = dispinterface ['{05D31AA6-1306-4DA0-9AE2-A8771FF6FA94}'] ... function ScChangeTextByName(const EntityName:WideString; const Text_

Re: [fpc-devel] Bug in passing WideString parameters to dispinterface function ?

2016-10-25 Thread LacaK
I can simplify it by this demo program (only compileable not runable): type Tintf = dispinterface ['{05D31AA6-1306-4DA0-9AE2-A8771FF6FA94}'] function wStr(const str1: WideString; const str2: WideString): Integer; dispid 3; end; function wStr(const str1: widestring; const str2: wide

Re: [fpc-devel] Bug in passing WideString parameters to dispinterface function ?

2016-10-26 Thread LacaK
FYI: Reported as bug #30792 I can simplify it by this demo program (only compileable not runable): type Tintf = dispinterface ['{05D31AA6-1306-4DA0-9AE2-A8771FF6FA94}'] function wStr(const str1: WideString; const str2: WideString): Integer; dispid 3; end; function wStr(const str1

Re: [fpc-devel] Last words about #31200 bug (for LacaK)

2017-01-09 Thread LacaK
hi in this aspect. It will be helpful to create tests for this case and report results for Delphi and FPC. -Laco. Since I can't post comment to closed bug and developer LacaK asked about "Btw how behaves Delphi in this case ? ", I think I can answer. Of course Delphi (Berlin 10.1)

[fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-14 Thread LacaK
Hi, I have C/C++ librarby (".lib" for Windows and ".a" for Linux) from Intel IPP package (they distribute ".lib" and also ".dll" for Windows and ".a" for Linux) Can I link in FPC (on Windows) at compile time to this ".lib" versions ? Or only possible way is link at runtime using ".dll" (and

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-14 Thread LacaK
Dňa 14.3.2017 o 15:57 silvioprog napísal(a): On Tue, Mar 14, 2017 at 9:30 AM, LacaK <mailto:la...@zoznam.sk>> wrote: Hi, I have C/C++ librarby (".lib" for Windows and ".a" for Linux) from Intel IPP package (they distribute ".lib" and also &q

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-15 Thread LacaK
Error: Undefined symbol: IPP__IPPITHRESHOLD_LTVAL_8U_C1IR$PIPP8U$LONGINT$IPPISIZE$BYTE$BYTE$$IPPSTATUS test 2: put the library implementation below function declaration, eg: function _ippiThreshold_LTValGTVal_8u_C1IR(pSrcDst: PIpp8u; srcDstStep: int;

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-15 Thread LacaK
Dňa 15.3.2017 o 12:54 Yury Sidorov napísal(a): On 3/14/2017 4:47 PM, Ladislav Karrach wrote: Did you try this: function ippiThreshold(pSrcDst: PIpp8u; srcDstStep: int; roiSize: IppiSize; thresholdLT: Ipp8u; valueLT: Ipp8u; thresholdGT: Ipp8u; valueGT: Ipp8u): IppStatus; e

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-15 Thread LacaK
>> >> >> Yes, you can statically link a COFF library created by other compiler. >> >> Use objdump as explained earlier to find out the name of ippiThreshold function in the static library. It may be prefixed with "_". > > But does it works also on Windows ? (as far as I does not have "objdump

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-16 Thread LacaK
ippcore.lib is just an import library for ippcore.dll. You should not use it for static linking. According to the Intel's site you should use the following libs for static linking: ippimt.lib ippsmt.lib ippcorelmt.lib Thank you! Now I do: {$linklib ippcoremt.lib} function ippGetLibVers

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-16 Thread LacaK
Dňa 16.3.2017 o 10:03 Karoly Balogh (Charlie/SGR) napísal(a): Hi, On Thu, 16 Mar 2017, LacaK wrote: Then I get another error: test_IPP.lpr(24,1) Error: Illegal COFF Magic while reading .\Intel_IPP\ippcoremt.lib Am I doing something wrong, or there is some kind of incompatibility between

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-16 Thread LacaK
Then I get: test_IPP.lpr(17,1) Error: undefined reference to `ippGetLibVersion' (I have tried also: _ippGetLibVersion, _ippGetLibVersion@0 ...) I've downloaded the IPP libs and did some tests to make sure that static linking is possible. Thank you very much for your effort! You use cdecl,

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-16 Thread LacaK
Besides that it does not work for me, when I add another two functions. Attached my example. I get error: .\Intel_IPP\\ippcoremt.lib(C:/commander/production/ipp201702gold/windows_ia32/.build/windows/obj/ia32/core/s/st/owncpufeatures.obj):(.text[_ownGetMaskFeatures]+0x35): undefined refere

Re: [fpc-devel] fpc-devel Digest, Vol 156, Issue 16

2017-04-26 Thread LacaK
The only alternative would be to advise *nix users to use the 3.0.0 release instead. 3.0.0 has (IMO serious) bug involving calculations with currency datatype on some platforms (Win64, Arm): http://bugs.freepascal.org/view.php?id=28748 Bart my two cents: 1) Why not call it 3.0.4? I woul

Re: [fpc-devel] Oracle CLOB and UTF8

2017-09-06 Thread LacaK
Hi, as far as I remember I have problems (when I have implemented support for CLOBs) you describe as well. I do not have access to Oracle DB anymore so I can not fix it, worse I am not aware of easy way how to get from OCI API information about byte length (and connection character set) ...

Re: [fpc-devel] MSSQL doesn't commit 2nd transaction

2018-06-17 Thread LacaK
Is this a bug in fpc-db or is this some kind of MSSQL feature? Does it mean I cannot use multiple transactions with one MSSQL connection? AFAIK MS SQL Server does not natively supports concept of multiple simultaneous independent transactions per one connection. (AFAIK also others RDBMS do

Re: [fpc-devel] MSSQL doesn't commit 2nd transaction

2018-06-18 Thread LacaK
We already do this for MySQL No AFAICS and Postgres (which also do not support multiple transactions). Yes (PostgreSQL is at this time only connector, that support this kind of "transaction as connection") L. ___ fpc-devel maillist - fpc-devel

Re: [fpc-devel] Free Pascal 3.0.6

2018-08-06 Thread LacaK
>> Are there plans to release version 3.0.6 later this year? > No. There will probably no 3.0.x anymore. (and even if, it would have mostly > minor RTL fixes, no sensitive compiler fixes). It would be nice have at least one maintenance release per year. Also some Database related bugs can be merge

Re: [fpc-devel] Free Pascal 3.0.6

2018-08-06 Thread LacaK
> > >> Are there plans to release version 3.0.6 later this year? > > No. There will probably no 3.0.x anymore. (and even if, it would > have mostly > > minor RTL fixes, no sensitive compiler fixes). > It would be nice have at least one maintenance release per year. > Also s

Re: [fpc-devel] [Patch/RFC] Warnings for (in/over)complete case statements

2019-01-02 Thread LacaK
>> - If a case statement on an ordinal does not contain labels for all values of >> the ordinal, and no else statement is given, raise a new warning (W6059). >> This >> is actually defined as an error in ISO7185 and a dynamic-violation in >> IEC10206. > So now I will have to add a useless else s

[fpc-devel] Readonly Memory Stream?

2019-02-13 Thread LacaK
Hi, sometimes I have to work with static fixed buffer in memory (for example returned from external API), which I would like to behave like stream. Then I define: type TStaticMemoryStream = class(TCustomMemoryStream) end; and in code I use for example:     MS := TStaticMemoryStream.Create;    

[fpc-devel] Currency bug and FPC 3.2.0

2019-10-09 Thread LacaK
Hi *, there was currency bug reported in https://bugs.freepascal.org/view.php?id=33439 and fixed in rev. 38555 and folloved rev. 38558 (by Florian) These patches are already merget to 3.2 branch, but there is condition {$ifndef VER3_0} Am I right in assumption, that when FPC 3.2.0  compile

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-09 Thread LacaK
Dňa 10.10.2019 o 8:24 Jonas Maebe napísal(a): On 2019-10-10 08:03, LacaK wrote: These patches are already merget to 3.2 branch, but there is condition {$ifndef VER3_0} Am I right in assumption, that when FPC 3.2.0  compiler will be released he will be build using FPC 3.0.4 ? Yes. If yes

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-10 Thread LacaK
Then FPCUpDeluxe uses different approach to build FPC compiler? Because when I test with Lazarus/FPC build from 3.2 branch bug is still there. Maybe the fix also depends on other changes that have not been merged. May be that FPCUpDeluxe uses only one build cycle ... so FPC 3.2 is build usin

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-10 Thread LacaK
Then FPCUpDeluxe uses different approach to build FPC compiler? Because when I test with Lazarus/FPC build from 3.2 branch bug is still there. Maybe the fix also depends on other changes that have not been merged. May be that FPCUpDeluxe uses only one build cycle ... so FPC 3.2 is build u

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-10 Thread LacaK
(sorry here is whole program) Win64 target! (on Win32 it works as expected for me) var   c: currency; begin   c:=922337203685.47;   writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1));   c:=-92233720368547;   writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1)); end. _

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-11 Thread LacaK
On Fri, Oct 11, 2019 at 7:29 AM LacaK wrote: var c: currency; begin c:=922337203685.47; writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1)); c:=-92233720368547; writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1)); end.

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-13 Thread LacaK
var     c: currency; begin     c:=922337203685.47;     writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1));     c:=-92233720368547;     writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1)); end. 3.0.4 win32   922337203685.4700 =  Trunc(c*1)=9223372036854700 -92233720368547. =

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-11-12 Thread LacaK
Then seems that bug reported here https://bugs.freepascal.org/view.php?id=33439 and in related reports is back again? I have reported it as a new bug: https://bugs.freepascal.org/view.php?id=36176 I'll check the currency stuff the next days, I have still some uncommitted patches regardi

[fpc-devel] Bug 0037793: Root directory in unit search path (-Fu) is not found

2021-03-24 Thread LacaK via fpc-devel
Hi *, can somebody please look at https://bugs.freepascal.org/view.php?id=37793 May be that fix is fast/simple enough. TIA -Laco. ___ fpc-devel maillist - fpc-devel@lists.freepascal.org https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-deve

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-26 Thread LacaK via fpc-devel
Hello, commit d68ce429ab6d94c8ffb251304df6cd7b97e99703 Author: lacak Date:   Tue Oct 27 10:01:30 2020 + commit 15dfa2e0c9ea5071af78d6ddbaf699ae95805630 Author: lacak Date:   Tue Oct 27 11:34:22 2020 + commit a8cd770b3cdfcad4a383ac1cca651c315269cc35 Author: lacak Date:   Tue Oct 27

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-27 Thread LacaK via fpc-devel
Dňa 27.9.2021 o 9:13 Michael Van Canneyt napísal(a): On Mon, 27 Sep 2021, LacaK via fpc-devel wrote: Hello, commit ab86ce7e62db2add637961e3ff98a7703c86cb2c Author: lacak Date:   Mon Jul 12 12:17:03 2021 + Sorry for so long list, but I absolutely do not understand how to do "c

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-27 Thread LacaK via fpc-devel
Hello, commit ab86ce7e62db2add637961e3ff98a7703c86cb2c Author: lacak Date:   Mon Jul 12 12:17:03 2021 + Sorry for so long list, but I absolutely do not understand how to do "cherry-pick" ... trying do it - I see there (in step 4: Pick into branch) only main branch and not fi

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-27 Thread LacaK via fpc-devel
Dňa 27.9.2021 o 14:03 Michael Van Canneyt napísal(a): On Mon, 27 Sep 2021, LacaK via fpc-devel wrote: Hello, commit ab86ce7e62db2add637961e3ff98a7703c86cb2c Author: lacak Date:   Mon Jul 12 12:17:03 2021 + Sorry for so long list, but I absolutely do not understand how to do

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-27 Thread LacaK via fpc-devel
Dňa 27.9.2021 o 14:13 Michael Van Canneyt napísal(a): On Mon, 27 Sep 2021, LacaK via fpc-devel wrote: And I get then redirect to: https://gitlab.com/lacak.sk/free-pascal-fpc-source/-/merge_requests/new?merge_request%5Bsource_branch%5D=cherry-pick-a8cd770b&merge_request%5Bsource_projec

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-27 Thread LacaK via fpc-devel
Thank you! Will there be also https://wiki.freepascal.org/FPC_New_Features_3.2.4 ? (I would like add there note) L. Am 27.09.2021 um 08:47 schrieb LacaK via fpc-devel : Hello, Sorry for so long list, No problem, a list is probably much easier to use than the web interface. I cherry

[fpc-devel] Currency * Double

2021-10-21 Thread LacaK via fpc-devel
Hi , what data type is result of multiplication of: (Currency * Double) on Win64 (and on Win32)?   c:=1115;   d:=1;   writeln(Round(c*d)); // gives -72967440737 I suppose that Currency*Double is Currency (on Win64) and result overflows MaxCurrency ...? (but then how FPC determines resu

Re: [fpc-devel] Currency * Double

2021-10-24 Thread LacaK via fpc-devel
Hi , what data type is result of multiplication of: (Currency * Double) on Win64 (and on Win32)?   c:=1115;   d:=1;   writeln(Round(c*d)); // gives -72967440737 32 bit version gives always 1115 as a result (and floating point math should always have extended precis

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-10-25 Thread LacaK via fpc-devel
The base output  is starting to work somewhat. http://www.stack.nl/~marcov/mergelogs32/restset.html Marco, can I see what commits were already merged ? (and what not - iow what is candidate for merging) L. ___ fpc-devel maillist - fpc-devel@lists.fre

<    1   2