On 14 Dec 2010, at 20:08, Martin wrote:
> type
> TFoo = class
> public
> FooValue: Integer;
> end;
> PFoo = ^TFoo;
>
> procedure FooFunc( Foo1: TFoo; pFoo1: PFoo);
>
>
> ptype Foo1
> "~"type = ^TFOO = class : public TOBJECT \n""
> ptype pFoo1
> "~"type = ^TFOO = class : public TOBJECT \n""
>
> Is gdb hiding something, or does FPC encode both types with the same info?
I think it's a bug in gdb's Pascal type printer, because if you set the
language to C then it does print the correct number of pointer indirections:
(gdb) ptype FOO1
type = class TFOO : public TOBJECT {
public:
LONGINT FOOVALUE;
} *
(gdb) ptype PFOO1
type = class TFOO : public TOBJECT {
public:
LONGINT FOOVALUE;
} **
(see the '*' and '**')
Jonas_______________________________________________
fpc-devel maillist - [email protected]
http://lists.freepascal.org/mailman/listinfo/fpc-devel
