Explorar o código

* all systems use an explicit record to pass data to nested routines when
targeting llvm

git-svn-id: branches/hlcgllvm@27138 -

Jonas Maebe %!s(int64=11) %!d(string=hai) anos
pai
achega
03e28d19d9
Modificáronse 1 ficheiros con 4 adicións e 0 borrados
  1. 4 0
      compiler/systems.pas

+ 4 - 0
compiler/systems.pas

@@ -336,8 +336,12 @@ interface
          variables, but emulate it by wrapping nested variables in records
          whose address is passed around }
        systems_fpnestedstruct = [
+{$ifndef llvm}
          system_jvm_java32,
          system_jvm_android32
+{$else not llvm}
+         low(tsystem)..high(tsystem)
+{$endif not llvm}
        ];
 
        cpu2str : array[TSystemCpu] of string[10] =