Browse Source

* HaltProc does not return

git-svn-id: trunk@49504 -
florian 4 years ago
parent
commit
c193551980
2 changed files with 2 additions and 2 deletions
  1. 1 1
      rtl/embedded/arm/cortexm0_start.inc
  2. 1 1
      rtl/embedded/arm/cortexm3_start.inc

+ 1 - 1
rtl/embedded/arm/cortexm0_start.inc

@@ -9,7 +9,7 @@ var
 
 procedure Pascalmain; external name 'PASCALMAIN';
 
-procedure HaltProc; assembler; nostackframe; public name'_haltproc';
+procedure HaltProc; assembler; nostackframe; public name'_haltproc'; noreturn;
 asm
 .Lloop:
    b .Lloop

+ 1 - 1
rtl/embedded/arm/cortexm3_start.inc

@@ -9,7 +9,7 @@ var
 
 procedure Pascalmain; external name 'PASCALMAIN';
 
-procedure HaltProc; assembler; nostackframe; public name'_haltproc';
+procedure HaltProc; assembler; nostackframe; public name'_haltproc'; noreturn;
 asm
 .Lloop:
    b .Lloop