paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-11 18:25:58 +02:00
Code Issues Packages Projects Releases Wiki Activity

* upper limit for heapsize removed

Browse Source
This commit is contained in:
Tomas Hajny 2003-10-18 09:14:18 +00:00
parent 8980fce60a
commit 4c5f5382a1
1 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/options.pas
View File

@ -518,7 +518,10 @@ begin
'h' : 'h' :
begin begin
val(copy(more,j+1,length(more)-j),heapsize,code); val(copy(more,j+1,length(more)-j),heapsize,code);
if (code<>0) or (heapsize>=67107840) or (heapsize<1024) then if (code<>0) or
{$WARNING Is the upper limit for heapsize needed / useful?}
{ (heapsize>=67107840) or }
(heapsize<1024) then
IllegalPara(opt); IllegalPara(opt);
break; break;
end; end;
@ -1702,7 +1705,7 @@ begin
def_symbol('FPC_HAS_TYPE_SINGLE'); def_symbol('FPC_HAS_TYPE_SINGLE');
{$endif} {$endif}
{$ifdef m68k} {$ifdef m68k}
def_symbol('CPUM68K'); def_symbol('CPU68K');
def_symbol('CPU32'); def_symbol('CPU32');
{$endif} {$endif}
{$ifdef ALPHA} {$ifdef ALPHA}
@ -1983,8 +1986,8 @@ finalization
end. end.
{ {
$Log$ $Log$
Revision 1.111 2003-10-17 21:05:27 olle Revision 1.112 2003-10-18 09:14:18 hajny
* compiler now defines cpum68k instead of cpu68k (as is used in rtl) * upper limit for heapsize removed
Revision 1.110 2003/10/14 00:30:48 florian Revision 1.110 2003/10/14 00:30:48 florian
+ some code for PIC support added + some code for PIC support added