2
0
Эх сурвалжийг харах

Complement commit 40104, by changing type of executionweight in toptinfo record and adapt pass_2 code

git-svn-id: trunk@40111 -
pierre 6 жил өмнө
parent
commit
04fd1a6397

+ 1 - 1
compiler/optbase.pas

@@ -44,7 +44,7 @@ unit optbase;
         defsum : tdfaset;
         avail : tdfaset;
         { estimation, how often the node is executed per subroutine call times 100, calculated by optutils.CalcExecutionWeight }
-        executionweight : aword;
+        executionweight : longint;
       end;
 
       poptinfo = ^toptinfo;

+ 1 - 1
compiler/pass_2.pas

@@ -194,7 +194,7 @@ implementation
             codegenerror:=false;
             oldexecutionweight:=cg.executionweight;
             if assigned(p.optinfo) then
-              cg.executionweight:=min(p.optinfo^.executionweight,QWord(high(cg.executionweight)))
+              cg.executionweight:=min(p.optinfo^.executionweight,high(cg.executionweight))
             else
               cg.executionweight:=100;
 {$ifdef EXTDEBUG}