|
@@ -263,12 +263,12 @@ implementation
|
|
function tloadnode.dogetcopy : tnode;
|
|
function tloadnode.dogetcopy : tnode;
|
|
var
|
|
var
|
|
n : tloadnode;
|
|
n : tloadnode;
|
|
-
|
|
|
|
begin
|
|
begin
|
|
n:=tloadnode(inherited dogetcopy);
|
|
n:=tloadnode(inherited dogetcopy);
|
|
n.symtable:=symtable;
|
|
n.symtable:=symtable;
|
|
n.symtableentry:=symtableentry;
|
|
n.symtableentry:=symtableentry;
|
|
n.fprocdef:=fprocdef;
|
|
n.fprocdef:=fprocdef;
|
|
|
|
+ n.loadnodeflags:=loadnodeflags;
|
|
result:=n;
|
|
result:=n;
|
|
end;
|
|
end;
|
|
|
|
|