Browse Source

* moved comment so it is recognized by lazarus as a method description

git-svn-id: trunk@30439 -
florian 10 years ago
parent
commit
2daae5ff03
1 changed files with 4 additions and 2 deletions
  1. 4 2
      compiler/aopt.pas

+ 4 - 2
compiler/aopt.pas

@@ -45,6 +45,9 @@ Unit aopt;
 
       private
         procedure FindLoHiLabels;
+
+        { Builds a table with the locations of the labels in the TAsmList.
+          Also fixes some RegDeallocs like "# %eax released; push (%eax)"  }
         Procedure BuildLabelTableAndFixRegAlloc;
         procedure clear;
         procedure pass_1;
@@ -121,9 +124,8 @@ Unit aopt;
           End
       End;
 
+
     Procedure TAsmOptimizer.BuildLabelTableAndFixRegAlloc;
-    { Builds a table with the locations of the labels in the TAsmList.       }
-    { Also fixes some RegDeallocs like "# %eax released; push (%eax)"           }
     Var p,hp1, hp2: tai;
         Regs: TAllUsedRegs;
         LabelIdx : longint;