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

* fixed m68k typo in r27438

Browse Source 
git-svn-id: trunk@27443 -
This commit is contained in:
Jonas Maebe 2014-04-01 21:48:28 +00:00
parent f017e16722
commit edff5a9aa1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/m68k/symcpu.pas
View File

@ -200,7 +200,7 @@ implementation
function tcpuprocdef.getcopyas(newtyp: tdeftyp; copytyp: tproccopytyp): tstoreddef; function tcpuprocdef.getcopyas(newtyp: tdeftyp; copytyp: tproccopytyp): tstoreddef;
begin begin
result:=inherited; result:=inherited;
if newtpy=procdef then if newtyp=procdef then
tcpuprocdef(result).libsym:=libsym; tcpuprocdef(result).libsym:=libsym;
end; end;