소스 검색

Add {$goto on} if FPC macro is defined

git-svn-id: trunk@42186 -
pierre 6 년 전
부모
커밋
471cb73c5f
1개의 변경된 파일5개의 추가작업 그리고 0개의 파일을 삭제
  1. 5 0
      tests/test/cpu16/i8086/tfarcal2.pp

+ 5 - 0
tests/test/cpu16/i8086/tfarcal2.pp

@@ -12,6 +12,11 @@
 
 program tfarcal2;
 
+{$ifdef FPC}
+{ FPC needs $goto on to accept labels and gotos }
+{$goto on}
+{$endif}
+
 uses
   dos;