浏览代码

* goto on

git-svn-id: trunk@8145 -
peter 18 年之前
父节点
当前提交
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