summaryrefslogtreecommitdiff
path: root/compiler/rautils.pas
diff options
context:
space:
mode:
authorflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2005-06-19 17:42:10 +0000
committerflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2005-06-19 17:42:10 +0000
commit288802d8a842ce09987b82d798d487ea7c00d65b (patch)
treec5118e0c489ce96ea1d38b1af72c33ab0aa451f1 /compiler/rautils.pas
parent1816dec185d639ae3e9fe2d86accba1a24fa388e (diff)
downloadfpc-288802d8a842ce09987b82d798d487ea7c00d65b.tar.gz
* node optimizer branch merged
* gotonode and gotolabel refactored * -Nu added to enable for loop unrolling git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@446 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/rautils.pas')
-rw-r--r--compiler/rautils.pas4
1 files changed, 3 insertions, 1 deletions
diff --git a/compiler/rautils.pas b/compiler/rautils.pas
index 60d3a5ab3f..2c254b5140 100644
--- a/compiler/rautils.pas
+++ b/compiler/rautils.pas
@@ -1366,7 +1366,9 @@ Begin
case sym.typ of
labelsym :
begin
- hl:=tlabelsym(sym).lab;
+ if not(assigned(tlabelsym(sym).asmblocklabel)) then
+ objectlibrary.getlabel(tlabelsym(sym).asmblocklabel);
+ hl:=tlabelsym(sym).asmblocklabel;
if emit then
tlabelsym(sym).defined:=true
else