* the length of a sequence loading a constant in a register is properly set

  * register contents are fully cleared in clearregcontentsfrom()

git-svn-id: trunk@3654 -

compiler/i386/csopt386.pas

@@ -870,6 +870,8 @@ begin
               begin
                 typ := con_unknown;
                 memwrite := nil;
+                startmod := nil;
+                nrofmods := 0;
               end;
         end;
       getNextInstruction(p,p);

compiler/i386/daopt386.pas

@@ -2566,6 +2566,7 @@ begin
                                   DestroyReg(curprop, tmpsupreg, true);
                                   typ := Con_Const;
                                   StartMod := p;
+                                  nrOfMods := 1;
                                 end
                             end;
                           top_ref: