paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-20 18:53:33 +01:00
Code Issues Packages Projects Releases Wiki Activity

* remove C like code to be able to compile unit

Browse Source 
git-svn-id: trunk@5794 -
This commit is contained in:
pierre 2007-01-02 23:30:23 +00:00
parent 21955282d0
commit 8bd9d88641
1 changed files with 24 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/m68k/cgcpu.pas
View File

@ -1318,7 +1318,7 @@ unit cgcpu;
{ only 68020+ supports RTD, so this needs another code path
for 68000 and Coldfire (KB) }
{$WARNING 68020+ only code generation, without fallback}
localsize+=4;
inc(localsize,4);
list.concat(taicpu.op_const(A_RTD,S_NO,localsize));
end
else