Sfoglia il codice sorgente

* fixed m68k typo in r27438

git-svn-id: trunk@27443 -
Jonas Maebe 11 anni fa
parent
commit
edff5a9aa1
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  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;