* Replace asm block with pascal in setreference

This commit is contained in:
michael 2019-07-11 06:57:30 +00:00
parent fc8ee39898
commit 2742723507

View File

@ -4375,9 +4375,7 @@ begin
aValue:= Self
else
aValue := nil;
asm
aOwner[aField.name]=aValue;
end;
TJSObject(aOwner)[String(TJSObject(aField)['name'])]:=aValue;
end;
end;
end;