Source position: gnode.inc line 10
type TGNode = record
data: gpointer;
next: PGNode;
prev: PGNode;
parent: PGNode;
children: PGNode;
end;