From 06af76dd6cf95a6cc90430d80995862342875881 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Mon, 4 Dec 2000 17:00:09 +0000
Subject: [PATCH]   * invalidate regs that depend on a modified register

---
 compiler/i386/daopt386.pas | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/compiler/i386/daopt386.pas b/compiler/i386/daopt386.pas
index f58f4b9dc0..279b5bfda7 100644
--- a/compiler/i386/daopt386.pas
+++ b/compiler/i386/daopt386.pas
@@ -1837,6 +1837,7 @@ Begin
           Inc(NrOfMods, NrOfInstrSinceLastMod[Reg]);
           PPaiProp(Pai(StartMod)^.OptInfo)^.Regs[Reg].NrOfMods := NrOfMods;
           NrOfInstrSinceLastMod[Reg] := 0;
+          invalidateDependingRegs(p^.optinfo,reg);
 {$ifdef StateDebug}
           hp := new(pai_asm_comment,init(strpnew(att_reg2str[reg]+': '+tostr(PPaiProp(p^.optinfo)^.Regs[reg].WState)
                 + ' -- ' + tostr(PPaiProp(p^.optinfo)^.Regs[reg].nrofmods))));
@@ -2447,7 +2448,10 @@ End.
 
 {
   $Log$
-  Revision 1.11  2000-11-29 00:30:44  florian
+  Revision 1.12  2000-12-04 17:00:09  jonas
+    * invalidate regs that depend on a modified register
+
+  Revision 1.11  2000/11/29 00:30:44  florian
     * unused units removed from uses clause
     * some changes for widestrings