Parcourir la source

* changed trgcpu.do_spill_replace_all() from a function (that doesn't set
its function result) into a procedure

git-svn-id: branches/jvmbackend@18454 -

Jonas Maebe il y a 14 ans
Parent
commit
da064b0ad6
1 fichiers modifiés avec 2 ajouts et 2 suppressions
  1. 2 2
      compiler/jvm/rgcpu.pas

+ 2 - 2
compiler/jvm/rgcpu.pas

@@ -38,7 +38,7 @@ unit rgcpu;
 
       trgcpu=class(trgobj)
        protected
-        class function  do_spill_replace_all(list:TAsmList;instr:taicpu;const spilltemps: tspilltemps):boolean;
+        class procedure do_spill_replace_all(list:TAsmList;instr:taicpu;const spilltemps: tspilltemps);
         class procedure remove_dummy_load_stores(list: TAsmList; headertai: tai);
        public
         { performs the register allocation for *all* register types }
@@ -56,7 +56,7 @@ implementation
 
     { trgcpu }
 
-    class function trgcpu.do_spill_replace_all(list:TAsmList;instr:taicpu;const spilltemps: tspilltemps):boolean;
+    class procedure trgcpu.do_spill_replace_all(list:TAsmList;instr:taicpu;const spilltemps: tspilltemps);
       var
         l: longint;
         reg: tregister;