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

amiga: added some code to compile the Amiga RTL with tinyheap. will be useful for Kickstart 1.3 and better very-low-end systems support. disabled by default. also added ifdefs around DynLibs support

Browse Source 
git-svn-id: trunk@37879 -
This commit is contained in:
Károly Balogh 2017-12-30 06:57:15 +00:00
parent 4c0e6980db
commit 888e59d34d
1 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
rtl/amiga/system.pp
View File

@ -23,7 +23,16 @@ interface
{$define FPC_IS_SYSTEM}
{$define FPC_HAS_ANSI_TEXTFILEREC}
{.$define FPC_AMIGA_USE_TINYHEAP}
{$ifdef FPC_AMIGA_USE_TINYHEAP}
{$define HAS_MEMORYMANAGER}
{$endif FPC_AMIGA_USE_TINYHEAP}
{$I systemh.inc}
{$ifdef FPC_AMIGA_USE_TINYHEAP}
{$i tnyheaph.inc}
{$endif FPC_AMIGA_USE_TINYHEAP}
{$I osdebugh.inc}
{$if defined(cpum68k) and defined(fpusoft)}
@ -117,6 +126,9 @@ implementation
{$endif defined(cpum68k) and defined(fpusoft)}
{$I system.inc}
{$ifdef FPC_AMIGA_USE_TINYHEAP}
{$i tinyheap.inc}
{$endif FPC_AMIGA_USE_TINYHEAP}
{$I osdebug.inc}
{$IFDEF AMIGAOS4}
@ -312,8 +324,10 @@ begin
SysInitAmigaOS;
{ Set up signals handlers }
// InstallSignals;
{$ifndef FPC_AMIGA_USE_TINYHEAP}
{ Setup heap }
InitHeap;
{$endif FPC_AMIGA_USE_TINYHEAP}
SysInitExceptions;
{$ifdef cpum68k}
fpc_cpucodeinit;
@ -326,5 +340,7 @@ begin
{ Arguments }
GenerateArgs;
InitSystemThreads;
{$ifdef FPC_HAS_FEATURE_DYNLIBS}
InitSystemDynLibs;
{$endif}
end.