|
@@ -1108,8 +1108,9 @@ implementation
|
|
end;
|
|
end;
|
|
recorddef:
|
|
recorddef:
|
|
procname:='FPC_COPY_JRECORD_ARRAY';
|
|
procname:='FPC_COPY_JRECORD_ARRAY';
|
|
|
|
+ stringdef:
|
|
|
|
+ procname:='FPC_COPY_JOBJECT_ARRAY';
|
|
setdef,
|
|
setdef,
|
|
- stringdef,
|
|
|
|
variantdef:
|
|
variantdef:
|
|
begin
|
|
begin
|
|
{ todo: make a deep copy via clone... }
|
|
{ todo: make a deep copy via clone... }
|