Explorar o código

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

git-svn-id: trunk@35043 -
Jonas Maebe %!s(int64=8) %!d(string=hai) anos
pai
achega
f26ed10ba1
Modificáronse 1 ficheiros con 4 adicións e 0 borrados
  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