|
@@ -1250,10 +1250,14 @@ implementation
|
|
|
end;
|
|
|
typesym:
|
|
|
begin
|
|
|
+ p1.free;
|
|
|
p1:=ctypenode.create(ttypesym(sym).typedef);
|
|
|
+ if not(block_type in [bt_type,bt_const_type,bt_var_type]) then
|
|
|
+ p1:=cloadvmtaddrnode.create(p1);
|
|
|
end;
|
|
|
constsym:
|
|
|
begin
|
|
|
+ p1.free;
|
|
|
p1:=genconstsymtree(tconstsym(sym));
|
|
|
end
|
|
|
else
|