diff --git a/compiler/i386/csopt386.pas b/compiler/i386/csopt386.pas
index 609556c999..c1673ae0c4 100644
--- a/compiler/i386/csopt386.pas
+++ b/compiler/i386/csopt386.pas
@@ -870,6 +870,8 @@ begin
               begin
                 typ := con_unknown;
                 memwrite := nil;
+                startmod := nil;
+                nrofmods := 0;
               end;
         end;
       getNextInstruction(p,p);
diff --git a/compiler/i386/daopt386.pas b/compiler/i386/daopt386.pas
index 57e5596a5b..01e2b5c1df 100644
--- a/compiler/i386/daopt386.pas
+++ b/compiler/i386/daopt386.pas
@@ -2566,6 +2566,7 @@ begin
                                   DestroyReg(curprop, tmpsupreg, true);
                                   typ := Con_Const;
                                   StartMod := p;
+                                  nrOfMods := 1;
                                 end
                             end;
                           top_ref: