paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-08 22:47:54 +02:00
Code Issues Packages Projects Releases Wiki Activity

Rename conditional: INTFPPU => DEBUG_GENERATE_INTERFACE_PPU

Browse Source
This commit is contained in:
Pierre Muller 2024-08-16 15:33:12 +00:00
parent 7ec9d2bf9f
commit 167b5213d1
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/fppu.pas
View File

@ -1906,7 +1906,7 @@ var
indirect_crc:=ppufile.indirect_crc;
{ end of implementation, to generate a correct ppufile
for ppudump when using INTFPPU define }
for ppudump when using DEBUG_GENERATE_INTERFACE_PPU define }
ppufile.writeentry(ibendimplementation);
{$ifdef Test_Double_checksum_write}

4
compiler/ppu.pas
View File

@ -30,7 +30,7 @@ interface
{ Also write the ppu if only crc if done, this can be used with ppudump to
see the differences between the intf and implementation }
{ define INTFPPU}
{ define DEBUG_GENERATE_INTERFACE_PPU}
{$ifdef Test_Double_checksum}
const
@ -343,7 +343,7 @@ end;
function tppufile.createfile:boolean;
begin
{$ifdef INTFPPU}
{$ifdef DEBUG_GENERATE_INTERFACE_PPU}
if crc_only then
begin
fname:=fname+'.intf';