Browse Source

* limit the stack size set by the -Cs option to 65520 bytes on i8086 and other
CPUs with a 16-bit address space

git-svn-id: trunk@27960 -

nickysn 11 years ago
parent
commit
d7f9265eba
1 changed files with 7 additions and 1 deletions
  1. 7 1
      compiler/options.pas

+ 7 - 1
compiler/options.pas

@@ -1005,7 +1005,13 @@ begin
                     's' :
                       begin
                          val(copy(more,j+1,length(more)-j),stacksize,code);
-                         if (code<>0) or (stacksize>=67107840) or (stacksize<1024) then
+                         if (code<>0)
+{$ifdef cpu16bitaddr}
+                            or (stacksize>=65521)
+{$else cpu16bitaddr}
+                            or (stacksize>=67107840)
+{$endif cpu16bitaddr}
+                            or (stacksize<1024) then
                           IllegalPara(opt);
                          break;
                       end;