Просмотр исходного кода

* goto on

git-svn-id: trunk@8145 -
peter 18 лет назад
Родитель
Сommit
585f9b09f4
1 измененных файлов с 3 добавлено и 0 удалено
  1. 3 0
      tests/webtbs/tw9059.pp

+ 3 - 0
tests/webtbs/tw9059.pp

@@ -1,5 +1,8 @@
 { %opt=-Oodfa -vw -Sew}
 program DoesNotSeemToBeInited;
+
+{$goto on}
+
 label 10, 20, 30;
 var i: integer;
 begin