paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-13 17:59:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

cgbase: make first parameter of supregset_reset "out"

Browse Source
This commit is contained in:
Jonas Maebe 2022-10-12 22:49:26 +02:00
parent d217a459aa
commit e2ade64a1e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/cgbase.pas
View File

@ -462,7 +462,7 @@ interface
mms_16,
mms_32 : pmmshuffle;
procedure supregset_reset(var regs:tsuperregisterset;setall:boolean;
procedure supregset_reset(out regs:tsuperregisterset;setall:boolean;
maxreg:Tsuperregister);{$ifdef USEINLINE}inline;{$endif}
procedure supregset_include(var regs:tsuperregisterset;s:tsuperregister);{$ifdef USEINLINE}inline;{$endif}
procedure supregset_exclude(var regs:tsuperregisterset;s:tsuperregister);{$ifdef USEINLINE}inline;{$endif}
@ -626,7 +626,7 @@ implementation
end;
procedure supregset_reset(var regs:tsuperregisterset;setall:boolean;
procedure supregset_reset(out regs:tsuperregisterset;setall:boolean;
maxreg:Tsuperregister);{$ifdef USEINLINE}inline;{$endif}
begin