From 11528c9da69239795a00051181c4ff707902bcbf Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Wed, 24 Jan 2007 09:55:45 +0000
Subject: [PATCH]   * better fix for tw8171 (now also works for
 with-statements)

git-svn-id: trunk@6158 -
---
 compiler/x86/rax86int.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/x86/rax86int.pas b/compiler/x86/rax86int.pas
index 129556bba4..8a33568106 100644
--- a/compiler/x86/rax86int.pas
+++ b/compiler/x86/rax86int.pas
@@ -984,7 +984,7 @@ Unit Rax86int;
                              end;
                            fieldvarsym :
                              begin
-                               tempstr:='SELF.'+tempstr;
+                               tempstr:=upper(tdef(sym.owner.defowner).GetTypeName)+'.'+tempstr;
                              end;
                            else
                              Message(asmr_e_wrong_sym_type);