paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-05-23 01:23:40 +02:00
Code Issues Packages Projects Releases Wiki Activity

Set default stack size for i8086-embedded target: 16384 for far data model, and 2048 for other memory models

Browse Source 
git-svn-id: trunk@43604 -
This commit is contained in:
pierre 2019-11-28 14:50:55 +00:00
parent 47b9ef4dc2
commit 3db08d28e9
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
compiler/parser.pas
View File

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