Browse Source

Add {$goto on} if FPC macro is defined

git-svn-id: trunk@42186 -
pierre 6 năm trước cách đây
mục cha
commit
471cb73c5f
1 tập tin đã thay đổi với 5 bổ sung0 xóa
  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;