소스 검색

Add {$goto on} for FPC to avoid compile time error

git-svn-id: trunk@34048 -
pierre 9 년 전
부모
커밋
ef6a8009cf
1개의 변경된 파일4개의 추가작업 그리고 0개의 파일을 삭제
  1. 4 0
      tests/test/cpu16/i8086/tlbldat1.pp

+ 4 - 0
tests/test/cpu16/i8086/tlbldat1.pp

@@ -4,6 +4,10 @@
 
 { this test is Turbo Pascal 7 compatible }
 
+{$ifdef FPC}
+  {$goto on}
+{$endif}
+
 program tlbldat1;
 label
   lbl;