+ new test for #9059

git-svn-id: trunk@8142 -

.gitattributes

@@ -8329,6 +8329,7 @@ tests/webtbs/tw8975.pp svneol=native#text/plain
 tests/webtbs/tw8975a.pp svneol=native#text/plain
 tests/webtbs/tw8977.pp svneol=native#text/plain
 tests/webtbs/tw9054.pp svneol=native#text/plain
+tests/webtbs/tw9059.pp svneol=native#text/plain
 tests/webtbs/tw9076.pp svneol=native#text/plain
 tests/webtbs/tw9076a.pp svneol=native#text/plain
 tests/webtbs/tw9085.pp svneol=native#text/plain

tests/webtbs/tw9059.pp

@@ -0,0 +1,11 @@
+{ %opt=-Oodfa -vw -Sew}
+program DoesNotSeemToBeInited;
+label 10, 20, 30;
+var i: integer;
+begin
+        goto 20;
+        10: begin i:= i + 1; goto 30 end;
+        20: i:= 1;
+        goto 10;
+        30: writeln( 'i = ', i)
+end.