Browse Source

* 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 years ago
parent
commit
31b70ecfd3
1 changed files with 2 additions and 0 deletions
  1. 2 0
      compiler/llvm/llvmtype.pas

+ 2 - 0
compiler/llvm/llvmtype.pas

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