[fpc-devel] String constant without code page

2017-12-14 Thread Petr Kristan
s possible to define '#' without cp? Or is possible to do fast string concatenation without conversion? Thanks Petr -- Petr Kristan . EPOS PRO s.r.o., Smilova 333, 530 02 Pardubice tel: +420 461101401Czech Republic (Eastern Europe) fax: +420 461101481

Re: [fpc-devel] Console encoding on Windows, output to file with ">"

2017-05-03 Thread Petr Kristan
.1.1 Windows, 32bit. > OS: Windows 10, 64bit > > Ondrej > > У„УЄУ–УЖУœУМУŸ > ___ > fpc-devel maillist - fpc-devel@lists.freepascal.org > http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel -- Petr Kristan . EPOS PRO

[fpc-devel] StrToDateTime and ShortDateFormat = 'd. M. yyyy'

2014-06-17 Thread Petr Kristan
I can try to do that, but are there any StrToDateTime tests? I do not want to break what is working until now. Petr -- Petr Kristan . EPOS PRO s.r.o., Smilova 333, 530 02 Pardubice tel: +420 461101401Czech Republic (Eastern Europe) fax: +420 461101481

Re: [fpc-devel] Need heap manager -gv explanation [tests]

2014-04-29 Thread Petr Kristan
nges pages within address space without actual moving the > data. This indeed can be done with almost zero overhead, but is > hardly portable. Thanks for the fast and perfect explanation. Resolution for me is that heap manager cannot be multiplatformly improved. I do some optimatization i

Re: [fpc-devel] Need heap manager -gv explanation [tests]

2014-04-29 Thread Petr Kristan
On Tue, Apr 29, 2014 at 11:41:59AM +0200, Mattias Gaertner wrote: > On Tue, 29 Apr 2014 10:30:43 +0200 > Petr Kristan wrote: > > >[...] > > > Check if you are increasing buffers in constant steps. > > > Change the increment to exponentially. > > I u

Re: [fpc-devel] Need heap manager -gv explanation [tests]

2014-04-29 Thread Petr Kristan
On Tue, Apr 29, 2014 at 11:49:20AM +0200, Tomas Hajny wrote: > On Tue, April 29, 2014 10:30, Petr Kristan wrote: > . > . > > I use "inteligent" block increasing. I can optimize program, but why is > > fpc heap manager to slow? > > > > Here is the sample

Re: [fpc-devel] Need heap manager -gv explanation [tests]

2014-04-29 Thread Petr Kristan
On Mon, Apr 28, 2014 at 09:29:50PM +0200, Mattias Gaertner wrote: > On Mon, 28 Apr 2014 21:14:14 +0200 > Petr Kristan wrote: > > >[...] > > > Others would be better positioned for more detailed comparison among > > > various heap managers with regard to spee

Re: [fpc-devel] Need heap manager -gv explanation

2014-04-28 Thread Petr Kristan
On Mon, Apr 28, 2014 at 06:12:18PM +0200, Tomas Hajny wrote: > On Mon, April 28, 2014 17:56, Mattias Gaertner wrote: > > On Mon, 28 Apr 2014 17:20:17 +0200 > > Petr Kristan wrote: > > > >> Hi > >> > >> I have some application with huge usage

[fpc-devel] Need heap manager -gv explanation

2014-04-28 Thread Petr Kristan
application is comiled with -gv or without -gv option? Thanks Petr -- Petr Kristan . EPOS PRO s.r.o., Smilova 333, 530 02 Pardubice tel: +420 461101401Czech Republic (Eastern Europe) fax: +420 461101481 ___ fpc-devel maillist - fpc-devel

[fpc-devel] Heaptrace + cwstring cause SIGSEGV at the end

2014-03-10 Thread Petr Kristan
uses cthreads, cwstring ... fpc 2.7.1 and lazarus 1.3 Exists some solution for this problem? Thanks Petr -- Petr Kristan . EPOS PRO s.r.o., Smilova 333, 530 02 Pardubice tel: +420 461101401Czech Republic (Eastern Europe) fax: +420 461101481

[fpc-devel] RangeCheck error in SetResourceStrings

2011-06-02 Thread Petr Kristan
cinil= I tried manualy repair rtlconsts.rst rtlconsts.smcinil='' And after rebuild everything was ok. I assume that file is generated, but cannot found how. In order to try repair it. Petr -- Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Cz

[fpc-devel] How to clearly shutdown ThreadManager

2011-05-19 Thread Petr Kristan
dlclose()? Thanks Petr -- Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http

Re: [fpc-devel] ThousandSeparator and UTF-8

2009-10-02 Thread petr . kristan
to define your own locale constants > with correct type sizes and manually do formatting. A pain in the > butt, I know. For me I solve it by hack replacing 0xC2 or 0xA0 to normal space 0x20. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel

[fpc-devel] ThousandSeparator and UTF-8

2009-10-02 Thread petr . kristan
On Linux and cs_CZ.UTF-8 locale is thousand separator set to NO-BREAK SPACE (UTF-8: 0xC2 0xA0). But ThousandSeparator variable is defined as Char. Fpc sets ThousandSeparator=0xA0 and kylix ThousandSeparator=0xC2. Any ideas how to correctly solve it? Petr -- Ing. Petr Kristan . EPOS PRO s.r.o

Re: [fpc-devel] Compiler message verbosity remapping patch

2009-06-11 Thread petr . kristan
y command parametr: > > -vm5024_,5025w,5026e which means: > > suppress message 5024, 5025 is warning and 5026 is error > > -vq shows compiler message numbers > > > > Is better to send extension patches here, or add it into bugtracker? > > Bug-tracker in general.

[fpc-devel] Compiler message verbosity remapping patch

2009-06-11 Thread petr . kristan
here, or add it into bugtracker? Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 Index: compiler/verbose.pas

Re: [fpc-devel] Unicode and Lazarus

2008-11-20 Thread petr . kristan
h ASCII. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/ma

Re: [fpc-devel] Unicode support - for the 20th time... ;-)

2008-11-20 Thread petr . kristan
velopers to keep adding such shitty hacks which could cause >> more issues in the long term - instead of solving issues. > > Design is almost final. Just give us time to implement. Can you summarize design in some document. For us developpe

Re: [fpc-devel] Re: Unicode support (again)

2008-11-11 Thread petr . kristan
more unexpected > behavior that with FPC, with String seemingly still being ANSIString ;). Yes. In D2009 String is UTF16String and Char is WideChar, sizeof(Char)=2. I personally do not like this solution. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel:

[fpc-devel] Compiler message verbosity remapping

2008-11-04 Thread petr . kristan
Hi. I little extend compiler parametr -m. Now we can remap message verbosity. Parametr -m5024_,5025w,5026e means: do not show message 5024, 5025 is warning and 5026 is error. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech

Re: [fpc-devel] Parallel Computing

2008-11-04 Thread petr . kristan
experienced programer brings more problems than profit. _parallel_ can be maybe used for lightweight threads. But here we must keep in mind that thread creation is quite expensive. Depending on memory architecture, number of CPUs and selected number of threads we can get different speedup or slo

Re: [fpc-devel] Parallel Computing

2008-11-04 Thread petr . kristan
uot; > stuff - is beyond the scope of the average application programmer and now > Oxygen/Prism with the "parallel" (and other) keywords and GCC with the > "#pragma ocm_..." are here to help the common application programmer with > that. This might - or might not - b

Re: [fpc-devel] Howto hide Hint: Parameter "yyy" not used

2008-10-08 Thread petr . kristan
your comments. Cmdline option: -vm showns msg numbers in listing -vm11004m1018 disables showing msg numbers 11004 and 1018 Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 Index: verbos

Re: [fpc-devel] Howto hide Hint: Parameter "yyy" not used

2008-09-29 Thread petr . kristan
24 and 05025. But I'am not sure if really realized msgtxt.inc rocket science :). That is why I do not change fpc help message in the patch. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223

[fpc-devel] Howto hide Hint: Parameter "xxx" not used

2008-09-29 Thread petr . kristan
mes I need Sender, sometimes not. Now I use this hack: make | grep -v 'Hint: Parameter ".*" not used' but some plain solution is welcome. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Easter

Re: [fpc-devel] clocale glibc extension patch

2008-09-15 Thread petr . kristan
epascal.org > > Is something wrong with my patch, that cannot be applied? > > Nono, I just didn't have time. > > > > > Or I have to place it into http://bugs.freepascal.org? > > Please do, and assign it to me. I'll try to do it later today, > but

[fpc-devel] Overloaded Pos bug

2008-09-11 Thread petr . kristan
tring):LongInt posx.pas(7) Fatal: There were 1 errors compiling module, stopping Fatal: Compilation aborted Kylix and about month erlier fpc was ok. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax:

Re: [fpc-devel] an observation about GetMem

2008-09-08 Thread petr . kristan
ed frees the memory and sets the pointer to nil if you > specify "0" as the memory size. Look at thread "AllocMem(0)<>nil" at 25.03.08. I had the same problem. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223

Re: [fpc-devel] Locale solution for Linux (and maybe *nix)

2008-08-04 Thread petr . kristan
"";"";/ > "";"";/ > "" > <...snip...> > % Date representation to be referenced by the "%x" field descriptor - > % "%d/%m/%Y", day/month/year as decimal numbers (01/01/2000)

[fpc-devel] Optimization -O2 on Linux AMD64

2008-07-10 Thread petr . kristan
rtl (sysutils) is compiled with -O2 implicitly. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc-devel maillist - fpc-devel

Re: [fpc-devel] Extended in Win64

2008-05-06 Thread petr . kristan
cision on AMD64 is depracated and should be replaced by SIMD. http://developer.amd.com/documentation/articles/Pages/62720069_4.aspx Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eas

[fpc-devel] Extended in Win64

2008-05-06 Thread petr . kristan
the best precision on the given platform.) Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc-devel maillist - fpc-devel

[fpc-devel] sysstr patch once more

2008-05-06 Thread petr . kristan
hen //length(s1)<>length(s2) if s1[0]=#0 then Result:=-1 //s1 shorter than s2 -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fp

Re: [fpc-devel] VarArray 64bit clean patch

2008-05-05 Thread petr . kristan
ur is the same on all platforms. Test was compilled with Delphi and Kylix with the same results. Comments are welcome. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 Index: rtl/

Re: [fpc-devel] Unix internationalization patch

2008-04-28 Thread petr . kristan
d (s[i] in ['E', 'O']) then //ignore modifier - inc(i); +OmitModifiers(s, i); if i>l then Exit; case s[i] of -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republi

Re: [fpc-devel] VarArray 64bit clean patch

2008-04-28 Thread petr . kristan
t and 64-bit linux. Program vas run in valgrind without errors. All my patches are also tested with our ported (delphi->fpc) ERP software self testing routines. 32-bit port already completes all tests without errors. Now I'am working on 64-bit port. Petr -- Ing. Petr Kristan . EPOS PRO

[fpc-devel] VarArray 64bit clean patch

2008-04-24 Thread petr . kristan
Hi. Today I worked on VarArrays. Here is 64-bit friendly VariantArray patch. Testing program is attached too. Implementation was tested on i386 and AMD64 linux with valgrind. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech

Re: [fpc-devel] Unix internationalization patch

2008-04-24 Thread petr . kristan
{ Number stuff } writeln(ThousandSeparator); writeln(DecimalSeparator); writeln(CurrencyDecimals); end; Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 __

Re: [fpc-devel] Valgrind strscan

2008-04-10 Thread petr . kristan
s alligned by 4 regardles str > >length > > Memcheck:Addr4 > > fun:SYSUTILS_STRSCAN$PCHAR$CHAR$$PCHAR > >} > > If you submit such a file, we can add it to svn. No problem. Here it is. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Par

Re: [fpc-devel] Valgrind strscan

2008-04-10 Thread petr . kristan
ith standard suppression files for glibc which suppress these > false positives. I'm not aware of any suppression files for FPC. I think that this is not false positive. We allocate 1 byte and read 4, report is right. But obviously effective solution do not exists. What about to establ

[fpc-devel] Valgrind strscan

2008-04-10 Thread petr . kristan
it. Besides routine is very sophisticated. :) But I think that solving this cosmetic error will save many developers hours during valgrind code checking. And preparing testcases fo fpc developers. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Cz

Re: [fpc-devel] Unix internationalization patch

2008-04-08 Thread petr . kristan
is tested only in Linux environment, but I assume that on other unices will be necessary to add some $IFDEFs. Finally a little question. I'am here new, do not know context and my english is bad. But why rtl/win/sysutils.pp can depend on windows and rtl/unix/sysutils.pp cannot depend on libc?

Re: [fpc-devel] TimeReFormat in FormatDateTime

2008-04-08 Thread petr . kristan
case > > > > > insensitive and comparison "If Result[i]='m'" leaves this out of > > > > > account. > > > > > > > > Did you test it ? If you can confirm that hh:mm:ss works correctly, then > > > > I'll apply the patc

Re: [fpc-devel] TimeReFormat in FormatDateTime

2008-04-08 Thread petr . kristan
'm'" leaves this out of > > > > account. > > > > > > Did you test it ? If you can confirm that hh:mm:ss works correctly, then > > > I'll apply the patch. > > Sure, I tested it. hh:mm:ss and hh:nn:ss works identically. > >

Re: [fpc-devel] TimeReFormat in FormatDateTime

2008-04-08 Thread petr . kristan
ames[Month]); > >end; > > end; > > end; > > > > Next TimeReFormat cannot work correctly, because FormatString is case > > insensitive and comparison "If Result[i]='m'" leaves

Re: [fpc-devel] TimeReFormat in FormatDateTime

2008-04-08 Thread petr . kristan
t; > Function TimeReFormat(Const S : string) : string; > > // Change m into n for time formatting. > > - Var i : longint; > > + //Var i : longint; > > > > begin > > Result:=S; > > - For I:=1 to Length(Result) do > >

Re: [fpc-devel] Unix internationalization patch

2008-04-08 Thread petr . kristan
t's initialization section. Ok. But where in rtl place this unit in the uses clause? Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 __

[fpc-devel] TimeReFormat in FormatDateTime

2008-04-08 Thread petr . kristan
'n'; + result[i]:='n';} end; var Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-devel

[fpc-devel] Unix internationalization patch

2008-04-08 Thread petr . kristan
Hi. Today i wrote code for filling formating variables in unix. I tested it only on Linux. I'm not sure with integration into unix/sysutils.pp and using libc. Patch is in the attachment. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 4663

[fpc-devel] TDataSet.FieldDefs patch

2008-04-07 Thread petr . kristan
Hi. We need to copy FieldDefs if programmer assigns to this property. For example RxMemoryDataset expect this behaviour. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 Index

Re: [fpc-devel] sysstr patch

2008-04-07 Thread petr . kristan
; You only have to check one of S1 or S2 being unequal to zero. (Otherwise > they would be different anyway). And what about case S1='' and S2='' in the first check? Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardu

[fpc-devel] sysstr patch

2008-04-04 Thread petr . kristan
am returns false and theoreticaly repeat..until may SIGSEGV because overflows empty PChar boundary after first cycle. Patch is in the attachment. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466

Re: [fpc-devel] How to convert Double to Comp without warning

2008-04-04 Thread petr . kristan
co; uses Classes, SysUtils; var t: TDateTime; m: Comp; begin t := 1000.999; m := Comp(t); writeln(m); end. #fpc -S2 co.pas #./co 1.001000E+0003 #fpc -Sd co.pas #./co 4.65201609613812E+0018 #dcc co.pas 4.65201609613812E+0018 Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., B

[fpc-devel] How to convert Double to Comp without warning

2008-04-04 Thread petr . kristan
compatible. Thanks. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http

[fpc-devel] Invalid compiler warning

2008-04-04 Thread petr . kristan
to be set Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.o

[fpc-devel] TDataset.ClearCalcFields

2008-04-01 Thread petr . kristan
ty too. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/m

[fpc-devel] Valgrind Val

2008-03-31 Thread petr . kristan
8) ==18377==by 0x804EEDA: fpc_val_sint_shortstr (sstrings.inc:819) ==18377==by 0x805171A: fpc_val_sint_ansistr (astrings.inc:881) ==18377==by 0x804827C: main (val.pas:5) Problem is that InitVal does not take into account empty string. And this little patch solves this for me. Petr --

Re: [fpc-devel] TVarRec.VAnsiString memory leak? - solved

2008-03-28 Thread petr . kristan
nsiString; > t:='yyy'; > vr.VAnsiString:=Pointer(T); > end. > Final solution is not to use VAnsiString because reference counting little confusing. My problem was to fill "array of const" with strings. And these strings must be somewere stored. Then i use v

[fpc-devel] TVarRec.VAnsiString memory leak?

2008-03-28 Thread petr . kristan
uot; with ansistrings. Thanks. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http:

[fpc-devel] MSecsToTimeStamp patch

2008-03-26 Thread petr . kristan
) @@ -75,7 +75,7 @@ function MSecsToTimeStamp(MSecs: comp): TTimeStamp; begin result.Date := Trunc(msecs / msecsperday); - msecs:= comp(msecs-result.date*msecsperday); + msecs:= msecs-comp(result.date)*msecsperday; result.Time := Round(MSecs); end ; -- Ing. Petr Kristan . EPOS PRO s.r.o

Re: [fpc-devel] AllocMem(0)<>nil

2008-03-26 Thread petr . kristan
) @@ -406,6 +406,11 @@ pp : pheap_mem_info; loc_info: pheap_info; begin + if size<=0 then +begin + TraceGetMem:=nil; + exit; +end; loc_info := @heap_info; try_finish_heap_free_todo_list(loc_info); inc(loc_info^.getmem_size,size); Are these patches acceptable? Pe

[fpc-devel] AllocMem(0)<>nil

2008-03-25 Thread petr . kristan
) } size := 1; Is this behaviour essential, or is possible make it compatible with Delphi? Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc

Re: [fpc-devel] Variants patch

2008-03-25 Thread petr . kristan
> > > varVariant,varUnknown,varShortInt,varByte,varWord,varLongWord,varInt64]; > >end; > > > > > > _______ > fpc-devel maillist - fpc-devel@lists.freepascal.org > http://lists.freepascal.org/mailman/listinfo/fpc-devel

[fpc-devel] Little fcl-db patch

2008-03-21 Thread petr . kristan
)); @@ -58,6 +59,7 @@ end; for i := 0 to FBufferCount do FreeRecordBuffer(FBuffers[i]); + FConstraints.Free; FreeMem(FBuffers); Inherited Destroy; end; -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe

[fpc-devel] Variants patch

2008-03-21 Thread petr . kristan
,varBoolean, varVariant,varUnknown,varShortInt,varByte,varWord,varLongWord,varInt64]; end; -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709

Re: [fpc-devel] TComponent.Tag type

2008-03-20 Thread petr . kristan
is is in 64bit inpossible. > > > >What about to change Tag type to SizeInt. > > Inspired by borland.delphi.public.non-technical? No, this is necessity. I do not know how to effectively change my code to not use Tag property. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., B

[fpc-devel] TComponent.Tag type

2008-03-20 Thread petr . kristan
Hi. I'am porting some code from 32 to 64 bit. And I found that TComponent.Tag is longint tj. 32bit. In my code is common to store Pointer into Tag, but this is in 64bit inpossible. What about to change Tag type to SizeInt. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625

Re: [fpc-devel] Linux ELF linking problem

2008-03-19 Thread petr . kristan
works without initializing, now I found why. In sysutils initialization they call setlocale. It confused me. But missing __libc_start_main do not mind? I think that it initializes malloc and threads. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 46

[fpc-devel] Linux ELF linking problem

2008-03-19 Thread petr . kristan
. objdump -R b None jump slot __libc_start_main It looks like some ELF linking problem. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc

[fpc-devel] libc patch

2008-03-18 Thread petr . kristan
ib name 'timer_settime'; +function timer_settime(__timerid:timer_t; __flags:longint; const __value: titimerspec; __ovalue:Pitimerspec):longint;cdecl;external clib name 'timer_settime'; function timer_gettime(__timerid:timer_t; var __value: titimerspec):lon

[fpc-devel] libc bug on Linux

2006-02-17 Thread petr . kristan
kus; const CODESET = 14; function nl_langinfo(__item: Integer): pchar;cdecl; external 'libc.so.6' name 'nl_langinfo'; begin writeln(CODESET,', ', nl_langinfo(CODESET)); end. Result is the same as above. Some linking problem ??? -- Ing. Petr Kristan . EPOS

Re: [fpc-devel] Variant compiling errors

2005-10-11 Thread petr . kristan
when > passing > them as parameters etc. However, this is wrong behaviour as soon as a variant > contains an array. Thanks for explanation. Yesterday i looked at compiler code and fpc internals documentation. I must recognize that fixing this is bey

[fpc-devel] Variant compiling errors

2005-10-10 Thread petr . kristan
ous reports (absolutely no interest), this will be fastest solution :(. Really here isn't anybody who understand to compiler code and help me with repair? Or is anywhere another e-mail list or another comunication channel where i can talk about this problem? Petr -- Ing. Petr Kristan . EPOS

Re: [fpc-devel] Problems with variants calling convenction

2005-10-04 Thread petr . kristan
rray. > > I have some free time to help with developement, but i need some > support from community. Now i read in compiler/nld.pas: { call helpers for variant, they can contain non ref. counted types like vararrays which must be really copied } But in Kylix aren't Variant resul

[fpc-devel] Problems with variants calling convenction

2005-10-04 Thread petr . kristan
opied in fpc_finalize to variable V Isn't it unneeded slowing down??? And there is futhermore some bug in the returning VarArray. I have some free time to help with developement, but i need some support from community. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 26

[fpc-devel] Sets and delphi compatibility

2005-09-19 Thread petr . kristan
t: 256 0 1 NULL DCC output: 256 0 1 hi I think that compiler makes set [varEmpty, varNull] only 8-bit. Is't any switch here to increase Delphi compatibility? Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Eur

Re: [fpc-devel] Some Dataset and Variants patches

2005-09-19 Thread petr . kristan
rocedure. But no-one had a clue where it was used > for. Probably it had something to do with some very old fpc-TDataset- > descendents. So it got removed. > > But if you can find a reason to keep it there... Maybe that ZEOS uses > it? Now i look at it. No ZEOS, but TRxMemoryData us

Re: [fpc-devel] Some Dataset and Variants patches

2005-09-16 Thread petr . kristan
fer. Patch with constraints and tempbuffer is really not important. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709 ___ fpc-devel mailli

[fpc-devel] VarArray bug

2005-09-16 Thread petr . kristan
memory management. Helps to declare procedure a(const v: variant); But it is not a solution. Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 466510709

[fpc-devel] Some Dataset and Variants patches

2005-09-16 Thread petr . kristan
irtual; property ActiveRecord: Longint read FActiveRecord; property CurrentRecord: Longint read FCurrentRecord; -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe)

Re: [fpc-devel] cross-compiling (linux program from Win32 platform)

2005-08-03 Thread petr . kristan
for an HOWTO setup a correct > > build environment (fpc.cfg). And what about linuxcrossbinutils2005.tar.gz :) Exists similar collection of cross bin utils on linux? Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Easte

Re: [fpc-devel] units precedence cthreads, variants

2005-06-03 Thread petr . kristan
e before cthreads then: > -- > Threading has been used before cthreads was initialized. > Make cthreads one of the first units in your uses clause. > Runtime error 211 at $08065B87 > $08065B87 > $080551CE > $08048440 > > &

[fpc-devel] units precedence cthreads, variants

2005-06-02 Thread petr . kristan
-- If unit variants are before cthreads then: -- Threading has been used before cthreads was initialized. Make cthreads one of the first units in your uses clause. Runtime error 211 at $08065B87 $08065B87 $080551CE $08048440 ---

[fpc-devel] Range check error in cthreads (make debug)

2005-06-02 Thread petr . kristan
/devel/fpc/rtl/inc/thread.inc $08140367 COMMONINIT, line 1519 of /mnt/progs/devel/fpc/rtl/objpas/classes/classes.inc without debug info (make) it is ok. Linux, fpc from svn Petr -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech

Re: [fpc-devel] Contribution

2005-06-01 Thread petr . kristan
e(..., > > varVariant) emits "VarArray is locked". > > Unfortunately my knowledge about variants internals is zero. > > Can you create a small example which shows the problem? BTW: Which OS do you > use? Win or other? OS: Linux fpc 2.1.1 from svn. --

Re: [fpc-devel] Contribution

2005-06-01 Thread petr . kristan
orking on it, but go ahead and change whatever > > you think needs changing. Patches can be sent to me. > > VarArrayCreate should basically work with 2.0.0. Yes VarArrayCreate(..., varInteger) works, but VarArrayCreate(..., varVariant) emits "VarArray is locked". Unfortunately

[fpc-devel] Contribution

2005-06-01 Thread petr . kristan
[0, 1], varVariant). Is here somebody who is working on Variants or may I try to penetrate into source and try to track down this bug? Petr Kristan -- Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223Czech Republic (Eastern Europe) fax: +420 4665