dwarf3 and others too [Re: [fpc-devel] Dwarf3 and the encoding of classes]

[Martin]

On 11/01/2011 00:23, Martin wrote:
> I did some more test., I will check in later...

Variant has also changed. Maybe intended, but no result can be optained...


  *** gdb 7.2-50   (fpc trunk / Dwarf3) TTestWatches TTestWatches 
TestWatches

<ptype ArgVariantInt>
&"ptype ArgVariantInt\n"
~"type = Variant = record \n"
~" <no data fields>\n"
~"end\n"
^done
(gdb)
<-data-evaluate-expression ArgVariantInt>
^done,value="{}"
(gdb)


  *** it used to be:
  *** gdb 7.0   (fpc 2.4.2 / Stabs) TTestWatches TTestWatches TestWatches

<ptype ArgVariantInt>
&"ptype ArgVariantInt\n"
~"type = VARIANT = record \n"
~"    VTYPE : WORD;\n"
~"    RES1 : WORD;\n"
~"    RES2 : WORD;\n"
~"    RES3 : WORD;\n"
~"    VSMALLINT : SMALLINT;\n"
~"    VINTEGER : LONGINT;\n"
~"    VSINGLE : record <unknown>;\n"
~"    VDOUBLE : DOUBLE;\n"
~"    VDATE : TDATETIME;\n"
~"    VCURRENCY : record <unknown>;\n"
~"    VOLESTR : PWIDECHAR;\n"
~"    VDISPATCH : POINTER;\n"
~"    VERROR : HRESULT;\n"
~"    VBOOLEAN : record <unknown>;\n"
~"    VUNKNOWN : POINTER;\n"
~"    VSHORTINT : SHORTINT;\n"
~"    VBYTE : BYTE;\n"
~"    VWORD : WORD;\n"
~"    VLONGWORD : LONGWORD;\n"
~"    VINT64 : INT64;\n"
~"    VQWORD : QWORD;\n"
~"    VWORD64 : QWORD;\n"
~"    VSTRING : POINTER;\n"
~"    VANY : POINTER;\n"
~"    VARRAY : PVARARRAY;\n"
~"    VPOINTER : POINTER;\n"
~"    VRECORD : POINTER;\n"
~"    PRECINFO : POINTER;\n"
~"    VLONGS : record <unknown>;\n"
~"    VWORDS : record <unknown>;\n"
~"    VBYTES : record <unknown>;\n"
~"end\n"
^done
(gdb)
<-data-evaluate-expression ArgVariantInt>
^done,value="{VTYPE = 16, RES1 = 0, RES2 = 0, RES3 = 0, VSMALLINT = 5, 
VINTEGER = 5, VSINGLE = <incomplete type>, VDOUBLE = 
2.4703282292062327e-323, VDATE = 2.4703282292062327e-323, VCURRENCY = 
<incomplete type>, VOLESTR = 0x5 <Address 0x5 out of bounds>, VDISPATCH 
= 0x5, VERROR = 5, VBOOLEAN = <incomplete type>, VUNKNOWN = 0x5, 
VSHORTINT = 5, VBYTE = 5, VWORD = 5, VLONGWORD = 5, VINT64 = 5, VQWORD = 
5, VWORD64 = 5, VSTRING = 0x5, VANY = 0x5, VARRAY = 0x5, VPOINTER = 0x5, 
VRECORD = 0x5, PRECINFO = 0x0, VLONGS = <incomplete type>, VWORDS = 
<incomplete type>, VBYTES = <incomplete type>}"