Browse Source

* fixed uninitialised variable (mantis 8198, already tested by
webtbs/tw3931a.pp)

git-svn-id: trunk@6183 -

Jonas Maebe 18 years ago
parent
commit
cc67ed17b5
1 changed files with 1 additions and 0 deletions
  1. 1 0
      compiler/x86/rax86int.pas

+ 1 - 0
compiler/x86/rax86int.pas

@@ -757,6 +757,7 @@ Unit Rax86int;
         expr:='';
         inexpression:=TRUE;
         parenlevel:=0;
+        sym:=nil;
         needvmtofs:=FALSE;
         Repeat
           { Support ugly delphi constructs like: [ECX].1+2[EDX] }