[fpc-pascal] googleapiconv

Sven Barth pascaldragon at googlemail.com
Mon Aug 22 17:10:43 CEST 2016


Am 22.08.2016 15:16 schrieb "Michael Van Canneyt" <michael at freepascal.org>:
>
>
>
> On Mon, 22 Aug 2016, Dave Connolly wrote:
>
>>> From what I can see the error seems to involve these two lines in the
>>
>> procedure TBaseObject.SetObjectProperty(P: PPropInfo; AValue:
TJSONObject);
>> in restbase.pp (fcl-web)
>>
>>    PA:=@(pdynarraytypeinfo(P^.PropType)^.elesize)+i;
>>    PA:=@(pdynarraytypeinfo(P^.PropType)^.eletype)+i;
>>
>>
>>    AN:=PTYpeInfo(PA^)^.Name;
>>
>> In my scenario the PTYpeInfo(PA^)^.Name is "t???/t???/t???/t0t at 0t"
>>
>> FPC 3.1.1 revision 34368
>
>
> I suspect this has to do with the additional level of indirection added by
> Sven Barth. I will need to check that.

Best don't use pdynarraytypeinfo as that doesn't correctly handle alignment
either, use PTypeData instead.

Regards,
Sven
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20160822/daeb79ee/attachment.html>


More information about the fpc-pascal mailing list