Ver Fonte

+ set default stack sizes for win16

git-svn-id: trunk@31550 -
nickysn há 10 anos atrás
pai
commit
dbd7c05bef
1 ficheiros alterados com 10 adições e 0 exclusões
  1. 10 0
      compiler/parser.pas

+ 10 - 0
compiler/parser.pas

@@ -140,6 +140,16 @@ implementation
                      maxheapsize:=65520;
                      maxheapsize:=65520;
                  end;
                  end;
              end;
              end;
+           system_i8086_win16:
+             begin
+               if stacksize=0 then
+                 begin
+                   if init_settings.x86memorymodel in x86_far_data_models then
+                     stacksize:=8192
+                   else
+                     stacksize:=5120;
+                 end;
+             end;
 {$endif i8086}
 {$endif i8086}
          end;
          end;
       end;
       end;