* assign a complexity of 2 to float nodes because they usually involve a loading from memory

git-svn-id: trunk@22097 -

compiler/nutils.pas

@@ -539,7 +539,11 @@ implementation
           begin
             case p.nodetype of
               { floating point constants usually need loading from memory }
-              realconstn,
+              realconstn:
+                begin
+                  result:=2;
+                  exit;
+                end;
               setconstn,
               stringconstn,
               temprefn,