Browse Source

* Xtensa: fix expectloc of taddnode

git-svn-id: trunk@44688 -
florian 5 years ago
parent
commit
f2d45a0e9d
1 changed files with 4 additions and 0 deletions
  1. 4 0
      compiler/xtensa/ncpuadd.pas

+ 4 - 0
compiler/xtensa/ncpuadd.pas

@@ -152,6 +152,10 @@ interface
     function TCPUAddNode.pass_1 : tnode;
       begin
         result:=inherited pass_1;
+        if not(assigned(result)) and (nodetype in [equaln,unequaln,ltn,lten,gtn,gten]) and
+          not((FPUXTENSA_SINGLE in fpu_capabilities[current_settings.fputype]) and
+            is_single(left.resultdef) and (nodetype<>slashn)) then
+          expectloc:=LOC_JUMP;
 {$ifdef dummy}
         if not(assigned(result)) then
           begin