Explorar o código

Add {$goto on} if FPC macro is defined

git-svn-id: trunk@42186 -
pierre %!s(int64=6) %!d(string=hai) anos
pai
achega
471cb73c5f
Modificáronse 1 ficheiros con 5 adicións e 0 borrados
  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;