Sfoglia il codice sorgente

+ missing {$goto on} added

git-svn-id: trunk@11700 -
florian 17 anni fa
parent
commit
ceb071d649
2 ha cambiato i file con 2 aggiunte e 0 eliminazioni
  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;
 procedure p; inline;
 label x;
 label x;
 begin
 begin

+ 1 - 0
tests/webtbs/uw11762.pp

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