From 2251e87e4197ad79afb32ed5d641fb225492f521 Mon Sep 17 00:00:00 2001 From: florian Date: Sun, 18 Feb 2018 17:31:09 +0000 Subject: [PATCH] * fix compilation for jvm, resolves #33195 git-svn-id: trunk@38283 - --- compiler/ncgmem.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/compiler/ncgmem.pas b/compiler/ncgmem.pas index e3452d7ec3..c4d551bfd9 100644 --- a/compiler/ncgmem.pas +++ b/compiler/ncgmem.pas @@ -356,9 +356,9 @@ implementation (target_info.system in systems_garbage_collected_managed_types) then begin { take care of the alignment of the fields } - if not(left.resultdef is tobjectdef) then + if not(left.resultdef is tabstractrecorddef) then Internalerror(2018021601); - location_reset_ref(location,LOC_REFERENCE,def_cgsize(resultdef),newalignment(tObjectSymtable(tobjectdef(left.resultdef).symtable).recordalignment,vs.fieldoffset),[]); + location_reset_ref(location,LOC_REFERENCE,def_cgsize(resultdef),newalignment(tabstractrecordsymtable(tabstractrecorddef(left.resultdef).symtable).recordalignment,vs.fieldoffset),[]); case left.location.loc of LOC_CREGISTER, LOC_REGISTER: