Re: [fpc-devel] Hom to initialize an object (old style object, not TObject)

2013-11-01 Thread Tomas Hajny
On Fri, November 1, 2013 16:18, Martin wrote: > On 01/11/2013 15:10, Tomas Hajny wrote: >> Sorry if I overlooked something, but where is the variable of that type >> declared in your code? These objects may be either declared statically >> ("var B: TBar") or dynamically ("Result := New (TBar.Init)"

Re: [fpc-devel] Hom to initialize an object (old style object, not TObject)

2013-11-01 Thread Martin
On 01/11/2013 16:00, Vincent Snijders wrote: Why is it old style, if you use mode objfpc? I did just look for a word, that would help distinguish it from TObject/class Afaik "object" existed before class? ___ fpc-devel maillist - fpc-devel@lists.

Re: [fpc-devel] Hom to initialize an object (old style object, not TObject)

2013-11-01 Thread Jonas Maebe
On 01/11/13 15:59, Martin wrote: If I have the code as shown at the end of the mail, i get project1.lpr(6,9) Warning: Function result variable does not seem to initialized but how can I initialize it? The warning is wrong. Jonas ___ fpc-devel mail

Re: [fpc-devel] Hom to initialize an object (old style object, not TObject)

2013-11-01 Thread Vincent Snijders
Why is it old style, if you use mode objfpc? Vincent ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-devel

Re: [fpc-devel] Hom to initialize an object (old style object, not TObject)

2013-11-01 Thread Martin
On 01/11/2013 15:10, Tomas Hajny wrote: Sorry if I overlooked something, but where is the variable of that type declared in your code? These objects may be either declared statically ("var B: TBar") or dynamically ("Result := New (TBar.Init)" - but then the return value must be of type PBar, not

Re: [fpc-devel] Hom to initialize an object (old style object, not TObject)

2013-11-01 Thread Tomas Hajny
On Fri, November 1, 2013 15:59, Martin wrote: > If I have the code as shown at the end of the mail, i get > > project1.lpr(6,9) Warning: Function result variable does not seem to > initialized > > but how can I initialize it? > > Unit1 > unit Unit1; {$mode objfpc}{$H+} > interface > uses Cla

[fpc-devel] Hom to initialize an object (old style object, not TObject)

2013-11-01 Thread Martin
If I have the code as shown at the end of the mail, i get project1.lpr(6,9) Warning: Function result variable does not seem to initialized but how can I initialize it? Unit1 unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils; type TBar = object private a: integer;

Re: [fpc-devel] 0025241: [Discussion] Reimplementing of floating-point <-> ASCII conversions

2013-11-01 Thread Jonas Maebe
On 31/10/13 15:32, Max Nazhalov wrote: To Jonas Maebe (regarding tstrreal2.pp): 7{$else FPC_HAS_TYPE_EXTENDED} 8 '0.10001', 9{$endif FPC_HAS_TYPE_EXTENDED} This one might be from the GRISU1_F2A_AGRESSIVE_ROUNDUP define. It fixes so

[fpc-devel] question about inline

2013-11-01 Thread Martin
At firs it makes sense, that a virtual method can not be inlined. So combining virtual/override with inline gives an error. But (apart from missing implementation in the compiler), if a virtual method is called from an inherited class, using the "inherited" keyword, then (afaik) it is known at

Re: [fpc-devel] Trunk does not build for arm-embedded since rev 25888

2013-11-01 Thread Michael Ring
OK, thank you! Am 01.11.13 12:10, schrieb Jonas Maebe: On 01/11/13 09:22, Michael Ring wrote: I tried today's trunk, unfortunately it does not build: /Users/ring/devel/fpc/compiler/ppcrossarm -Cparmv7m @rtl.cfg -Ur -Tembedded -Parm -XParm-none-eabi- -Xr -Ur -Xs -O2 -n -Fi../inc -Fi../arm -FE.

Re: [fpc-devel] Trunk does not build for arm-embedded since rev 25888

2013-11-01 Thread Jonas Maebe
On 01/11/13 09:22, Michael Ring wrote: I tried today's trunk, unfortunately it does not build: /Users/ring/devel/fpc/compiler/ppcrossarm -Cparmv7m @rtl.cfg -Ur -Tembedded -Parm -XParm-none-eabi- -Xr -Ur -Xs -O2 -n -Fi../inc -Fi../arm -FE. -FU/Users/ring/devel/fpc/rtl/units/arm-embedded -darm -d

[fpc-devel] Trunk does not build for arm-embedded since rev 25888

2013-11-01 Thread Michael Ring
I tried today's trunk, unfortunately it does not build: /Users/ring/devel/fpc/compiler/ppcrossarm -Cparmv7m @rtl.cfg -Ur -Tembedded -Parm -XParm-none-eabi- -Xr -Ur -Xs -O2 -n -Fi../inc -Fi../arm -FE. -FU/Users/ring/devel/fpc/rtl/units/arm-embedded -darm -dRELEASE -O- -Us -Sg system.pp flt_pac

[fpc-devel] TBits problem

2013-11-01 Thread Andrea Mauri
Dear All, I am using TBits object but I found some errors using it. Before adding a bugreport to the bugtracker I would be sure that there is nothing that I am doing wrong. Below a small procedure that highlights the wrong behaviour of TBits object. var i, bsize1, bsize2: integer; b1, b2,

[fpc-devel] TBits problem

2013-11-01 Thread Andrea Mauri
Dear All, I am not subscribed to the fpcdevel mailing list. Anyway I am using TBits object but I found some errors using it. Before adding a bugreport to the bugtracker I would be sure that there is nothing that I am doing wrong. Below a small procedure that highlights the wrong behaviour of TB