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

* Enabled safecall for mips.

Browse Source 
git-svn-id: trunk@26709 -
This commit is contained in:
yury 2014-02-07 14:12:33 +00:00
parent cace38029c
commit c58340f8dd
2 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/fpcdefs.inc
View File

@ -224,6 +224,7 @@
{$define cpurefshaveindexreg} {$define cpurefshaveindexreg}
{$define fpc_compiler_has_fixup_jmps} {$define fpc_compiler_has_fixup_jmps}
{$define SUPPORT_GET_FRAME} {$define SUPPORT_GET_FRAME}
{$define SUPPORT_SAFECALL}
{$endif mips} {$endif mips}
{$ifdef jvm} {$ifdef jvm}

1
compiler/mips/cpuinfo.pas
View File

@ -63,6 +63,7 @@ Const
supported_calling_conventions : tproccalloptions = [ supported_calling_conventions : tproccalloptions = [
pocall_internproc, pocall_internproc,
pocall_stdcall, pocall_stdcall,
pocall_safecall,
{ same as stdcall only different name mangling } { same as stdcall only different name mangling }
pocall_cdecl, pocall_cdecl,
{ same as stdcall only different name mangling } { same as stdcall only different name mangling }