Sfoglia il codice sorgente

* don't perform the automatic insertion of typecasts in case register
allocation hasn't been performed, because then reused "registers"
could have multiple types

git-svn-id: trunk@34121 -

Jonas Maebe 9 anni fa
parent
commit
31b70ecfd3
1 ha cambiato i file con 2 aggiunte e 0 eliminazioni
  1. 2 0
      compiler/llvm/llvmtype.pas

+ 2 - 0
compiler/llvm/llvmtype.pas

@@ -626,6 +626,8 @@ implementation
         i: longint;
         hal: tasmlisttype;
       begin
+        if cs_no_regalloc in current_settings.globalswitches then
+          exit;
         storefilepos:=current_filepos;
         current_filepos:=current_module.mainfilepos;