Parcourir la source

* same as r27223 for hlcgobj (fixes webtbs/tw25895 for llvm)

git-svn-id: trunk@35043 -
Jonas Maebe il y a 8 ans
Parent
commit
f26ed10ba1
1 fichiers modifiés avec 4 ajouts et 0 suppressions
  1. 4 0
      compiler/hlcgobj.pas

+ 4 - 0
compiler/hlcgobj.pas

@@ -5073,6 +5073,10 @@ implementation
     var
       tmploc: tlocation;
     begin
+      { skip e.g. empty records }
+      if (cgpara.location^.loc = LOC_VOID) then
+        exit;
+
       { Handle Floating point types differently
 
         This doesn't depend on emulator settings, emulator settings should