summaryrefslogtreecommitdiff
path: root/compiler/i386/daopt386.pas
diff options
context:
space:
mode:
authorjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2009-06-27 11:27:31 +0000
committerjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2009-06-27 11:27:31 +0000
commitd80b69c1f27f0dfb352c057ad2f42c89b31a437b (patch)
treec680e97394a4a7a3f17f8ddb7779dac1249314aa /compiler/i386/daopt386.pas
parent278b197e6367d3948e41bb610699fd10eead397e (diff)
downloadfpc-d80b69c1f27f0dfb352c057ad2f42c89b31a437b.tar.gz
* moved field definitions before method/property definitions (see mantis
#13971) git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@13330 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/i386/daopt386.pas')
-rw-r--r--compiler/i386/daopt386.pas14
1 files changed, 7 insertions, 7 deletions
diff --git a/compiler/i386/daopt386.pas b/compiler/i386/daopt386.pas
index f2e16674da..0e91c9b9c3 100644
--- a/compiler/i386/daopt386.pas
+++ b/compiler/i386/daopt386.pas
@@ -218,13 +218,6 @@ type
function getlabelwithsym(sym: tasmlabel): tai;
private
- { Walks through the list to find the lowest and highest label number, inits the }
- { labeltable and fixes/optimizes some regallocs }
- procedure initlabeltable;
-
- function initdfapass2: boolean;
- procedure dodfapass2;
-
{ asm list we're working on }
list: TAsmList;
@@ -240,6 +233,13 @@ type
{ all labels in the current block: their value mapped to their location }
lolab, hilab, labdif: longint;
labeltable: plabeltable;
+
+ { Walks through the list to find the lowest and highest label number, inits the }
+ { labeltable and fixes/optimizes some regallocs }
+ procedure initlabeltable;
+
+ function initdfapass2: boolean;
+ procedure dodfapass2;
end;