diff --git a/rtl/i386/i386.inc b/rtl/i386/i386.inc index 64dc6f7332..d620a4f2aa 100644 --- a/rtl/i386/i386.inc +++ b/rtl/i386/i386.inc @@ -67,13 +67,13 @@ procedure fpc_cpuinit; end; {$ifndef darwin} -function fpc_geteipasebx : pointer; [public, alias: 'fpc_geteipasebx'];assembler; nostackframe; +procedure fpc_geteipasebx; [public, alias: 'fpc_geteipasebx'];assembler; nostackframe; asm movl (%esp),%ebx end; -function fpc_geteipasecx : pointer; [public, alias: 'fpc_geteipasecx'];assembler; nostackframe; +procedure fpc_geteipasecx; [public, alias: 'fpc_geteipasecx'];assembler; nostackframe; asm movl (%esp),%ecx end; diff --git a/rtl/linux/i386/si_prc.inc b/rtl/linux/i386/si_prc.inc index 5434d27562..ae0531dd9e 100644 --- a/rtl/linux/i386/si_prc.inc +++ b/rtl/linux/i386/si_prc.inc @@ -42,7 +42,7 @@ var dlexitproc : pointer; {$ifdef FPC_PIC} -function fpc_geteipasebxlocal : pointer; [external name 'fpc_geteipasebx']; +procedure fpc_geteipasebxlocal; [external name 'fpc_geteipasebx']; {$endif} procedure InitTLS; [external name 'FPC_INITTLS'];