Browse Source

* made internalerror unique

git-svn-id: trunk@27165 -
Jonas Maebe 11 years ago
parent
commit
5dd4389f78
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/optvirt.pas

+ 1 - 1
compiler/optvirt.pas

@@ -593,7 +593,7 @@ unit optvirt;
         mainsymtab:=objparentsymtab.defowner.owner;
         mainsymtab:=objparentsymtab.defowner.owner;
         { main symtable must be static or global }
         { main symtable must be static or global }
         if not(mainsymtab.symtabletype in [staticsymtable,globalsymtable]) then
         if not(mainsymtab.symtabletype in [staticsymtable,globalsymtable]) then
-         internalerror(200204175);
+         internalerror(200204177);
         if (TSymtable(main_module.localsymtable)=mainsymtab) and
         if (TSymtable(main_module.localsymtable)=mainsymtab) and
             (not main_module.is_unit) then
             (not main_module.is_unit) then
            { same convention as for mangled names }
            { same convention as for mangled names }