paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-04 03:57:41 +01:00
Code Issues Packages Projects Releases Wiki Activity

* changed the default stack size in the i8086 far data memory models to 16 KB

Browse Source 
git-svn-id: trunk@27841 -
This commit is contained in:
nickysn 2014-06-01 14:38:54 +00:00
parent 02d36c56f7
commit a52d8abe38
2 changed files with 11 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
compiler/parser.pas
View File

@ -122,6 +122,16 @@ implementation
include(supported_calling_conventions,pocall_syscall);
system_m68k_amiga:
include(supported_calling_conventions,pocall_syscall);
{$ifdef i8086}
system_i8086_msdos:
if stacksize=0 then
begin
if init_settings.x86memorymodel in x86_far_data_models then
stacksize:=16384
else
stacksize:=4096;
end;
{$endif i8086}
end;
end;

2
compiler/systems/i_msdos.pas
View File

@ -98,7 +98,7 @@ unit i_msdos;
maxCrecordalign : 2
);
first_parm_offset : 4;
stacksize : 4096;
stacksize : 0;
stackalign : 2;
abi : abi_default;
);