Pārlūkot izejas kodu

* don't use inline asm in setjump.inc for 6502

Nikolay Nikolov 1 gadu atpakaļ
vecāks
revīzija
a881ae6baf
1 mainītis faili ar 4 papildinājumiem un 4 dzēšanām
  1. 4 4
      rtl/mos6502/setjump.inc

+ 4 - 4
rtl/mos6502/setjump.inc

@@ -14,11 +14,11 @@
 
  **********************************************************************}
 
-function fpc_setjmp(var S : jmp_buf) : shortint;assembler;[Public, alias : 'FPC_SETJMP'];nostackframe;compilerproc;
-  asm
+function fpc_setjmp(var S : jmp_buf) : shortint;[Public, alias : 'FPC_SETJMP'];nostackframe;compilerproc;
+  begin
   end;
 
 
-procedure fpc_longjmp(var S : jmp_buf;value : shortint);assembler;[Public, alias : 'FPC_LONGJMP'];nostackframe;compilerproc;
-  asm
+procedure fpc_longjmp(var S : jmp_buf;value : shortint);[Public, alias : 'FPC_LONGJMP'];nostackframe;compilerproc;
+  begin
   end;