diff --git a/rtl/sparc/sparc.inc b/rtl/sparc/sparc.inc index d773161802..3178d6d835 100644 --- a/rtl/sparc/sparc.inc +++ b/rtl/sparc/sparc.inc @@ -19,12 +19,13 @@ {**************************************************************************** SPARC specific stuff ****************************************************************************} -function get_fsr : dword;assembler;nostackframe;[public, alias: 'FPC_GETFSR']; +function get_fsr : dword;assembler;[public, alias: 'FPC_GETFSR']; var fsr : dword; asm st %fsr,fsr - ld fsr,%o0 + ld fsr,%l0 + st %l0,__result end;