Преглед изворни кода

+ missing {$goto on} added

git-svn-id: trunk@11700 -
florian пре 17 година
родитељ
комит
ceb071d649
2 измењених фајлова са 2 додато и 0 уклоњено
  1. 1 0
      tests/webtbs/tw11763.pp
  2. 1 0
      tests/webtbs/uw11762.pp

+ 1 - 0
tests/webtbs/tw11763.pp

@@ -1,3 +1,4 @@
+{$goto on}
 procedure p; inline;
 label x;
 begin

+ 1 - 0
tests/webtbs/uw11762.pp

@@ -1,3 +1,4 @@
+{$goto on}
 unit uw11762;
 interface
 procedure p; inline;