فهرست منبع

* fixed m68k typo in r27438

git-svn-id: trunk@27443 -
Jonas Maebe 11 سال پیش
والد
کامیت
edff5a9aa1
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  1. 1 1
      compiler/m68k/symcpu.pas

+ 1 - 1
compiler/m68k/symcpu.pas

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