Ver Fonte

* fixed m68k typo in r27438

git-svn-id: trunk@27443 -
Jonas Maebe há 11 anos atrás
pai
commit
edff5a9aa1
1 ficheiros alterados com 1 adições e 1 exclusões
  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;