diff --git a/compiler/nset.pas b/compiler/nset.pas
index 368aa7d17c..ff3c6feaac 100644
--- a/compiler/nset.pas
+++ b/compiler/nset.pas
@@ -947,6 +947,7 @@ implementation
         printnodeinfo(t);
         writeln(t);
         printnode(t,left);
+        i:=0;
         for i:=0 to blocks.count-1 do
           begin
             writeln(t,printnodeindention,'(caseblock blockid: ',i);
diff --git a/compiler/wpobase.pas b/compiler/wpobase.pas
index e0c1b88b97..9f659854f3 100644
--- a/compiler/wpobase.pas
+++ b/compiler/wpobase.pas
@@ -507,6 +507,7 @@ implementation
               cgmessage2(wpo_expected_section,tostr(flinenr),s);
               break;
             end;
+          i:=2;
           for i:=2 to length(s) do
             if (s[i]<>' ') then
               break;