mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-12-06 14:50:17 +01:00
Add explicit {$hugecode off} for tests that need it
git-svn-id: trunk@39391 -
This commit is contained in:
parent
f36ac3adbd
commit
841a166847
@ -18,6 +18,7 @@
|
|||||||
program tfarcal3;
|
program tfarcal3;
|
||||||
|
|
||||||
{$F+}
|
{$F+}
|
||||||
|
{$hugecode off}
|
||||||
|
|
||||||
uses
|
uses
|
||||||
dos;
|
dos;
|
||||||
|
|||||||
@ -18,6 +18,7 @@
|
|||||||
program tfarcal4;
|
program tfarcal4;
|
||||||
|
|
||||||
{$F-}
|
{$F-}
|
||||||
|
{$hugecode off}
|
||||||
|
|
||||||
uses
|
uses
|
||||||
dos;
|
dos;
|
||||||
|
|||||||
@ -5,6 +5,7 @@
|
|||||||
{$mode TP}
|
{$mode TP}
|
||||||
|
|
||||||
{$F-}
|
{$F-}
|
||||||
|
{$hugecode off}
|
||||||
|
|
||||||
{ should be near, since we are in $F- mode }
|
{ should be near, since we are in $F- mode }
|
||||||
procedure myproc;
|
procedure myproc;
|
||||||
@ -112,4 +113,4 @@ end.
|
|||||||
begin
|
begin
|
||||||
{ silently succeed in the other memory models }
|
{ silently succeed in the other memory models }
|
||||||
end.
|
end.
|
||||||
{$endif}
|
{$endif}
|
||||||
|
|||||||
@ -12,6 +12,8 @@
|
|||||||
|
|
||||||
program tretf1;
|
program tretf1;
|
||||||
|
|
||||||
|
{$hugecode off}
|
||||||
|
|
||||||
uses
|
uses
|
||||||
dos;
|
dos;
|
||||||
|
|
||||||
|
|||||||
@ -12,6 +12,8 @@
|
|||||||
|
|
||||||
program tretf2;
|
program tretf2;
|
||||||
|
|
||||||
|
{$hugecode off}
|
||||||
|
|
||||||
uses
|
uses
|
||||||
dos;
|
dos;
|
||||||
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user