Explorar o código

* don't allow records to be put in registers for the llvm target

git-svn-id: trunk@31685 -
Jonas Maebe %!s(int64=10) %!d(string=hai) anos
pai
achega
75992c1274
Modificáronse 1 ficheiros con 4 adicións e 0 borrados
  1. 4 0
      compiler/symdef.pas

+ 4 - 0
compiler/symdef.pas

@@ -2030,6 +2030,9 @@ implementation
             is_intregable:=is_smallset(self);
           recorddef:
             begin
+{$ifdef llvm}
+              is_intregable:=false;
+{$else llvm}
               recsize:=size;
               is_intregable:=
                 ispowerof2(recsize,temp) and
@@ -2039,6 +2042,7 @@ implementation
                   not trecorddef(self).contains_float_field) or
                   (recsize <= sizeof(asizeint))) and
                 not needs_inittable;
+{$endif llvm}
             end;
         end;
      end;