|
@@ -1022,6 +1022,7 @@ implementation
|
|
|
initcopy:=fparainit.getcopy;
|
|
initcopy:=fparainit.getcopy;
|
|
|
n:=tcallparanode(inherited dogetcopy);
|
|
n:=tcallparanode(inherited dogetcopy);
|
|
|
n.callparaflags:=callparaflags;
|
|
n.callparaflags:=callparaflags;
|
|
|
|
|
+ n.originalindex:=originalindex;
|
|
|
n.parasym:=parasym;
|
|
n.parasym:=parasym;
|
|
|
n.fparainit:=initcopy;
|
|
n.fparainit:=initcopy;
|
|
|
if assigned(fparacopyback) then
|
|
if assigned(fparacopyback) then
|
J. Gareth "Curious Kit" Moreton