Browse Source

* declared tlabelsym.mangledname as override

git-svn-id: trunk@4184 -
Jonas Maebe 19 years ago
parent
commit
4861472e7b
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/symsym.pas

+ 1 - 1
compiler/symsym.pas

@@ -63,7 +63,7 @@ interface
           constructor create(const n : string);
           constructor ppuload(ppufile:tcompilerppufile);
           procedure ppuwrite(ppufile:tcompilerppufile);override;
-          function mangledname:string;
+          function mangledname:string;override;
        end;
 
        tunitsym = class(Tstoredsym)