Преглед на файлове

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

git-svn-id: trunk@35043 -
Jonas Maebe преди 8 години
родител
ревизия
f26ed10ba1
променени са 1 файла, в които са добавени 4 реда и са изтрити 0 реда
  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