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

Add FPC_SYSTEM_EXIT_NO_RETURN macro for embedded target

Browse Source 
git-svn-id: trunk@40801 -
This commit is contained in:
pierre 2019-01-07 21:41:18 +00:00
parent 2ceb5c9683
commit 3a52fdf997
2 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
rtl/embedded/system.pp
View File

@ -197,6 +197,7 @@ const calculated_cmdline:Pchar=nil;
{$endif FPC_HAS_FEATURE_SOFTFPU} {$endif FPC_HAS_FEATURE_SOFTFPU}
{$endif FPUNONE} {$endif FPUNONE}
{$define FPC_SYSTEM_EXIT_NO_RETURN}
{$I system.inc} {$I system.inc}
{***************************************************************************** {*****************************************************************************

3
rtl/inc/system.inc
View File

@ -1020,7 +1020,8 @@ end;
Error / Exit / ExitProc Error / Exit / ExitProc
*****************************************************************************} *****************************************************************************}
Procedure system_exit;forward; Procedure system_exit;forward;{$ifdef FPC_SYSTEM_EXIT_NO_RETURN}noreturn;{$endif}
{$ifdef FPC_HAS_FEATURE_HEAP} {$ifdef FPC_HAS_FEATURE_HEAP}
{$ifndef HAS_MEMORYMANAGER} {$ifndef HAS_MEMORYMANAGER}
//not needed if independant memory manager //not needed if independant memory manager