Browse Source

* made internalerror unique

git-svn-id: trunk@14195 -
Jonas Maebe 15 years ago
parent
commit
9e87f42b16
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/pexpr.pas

+ 1 - 1
compiler/pexpr.pas

@@ -1594,7 +1594,7 @@ implementation
                           do_member_read(tobjectdef(hdef),getaddr,srsym,p1,again,[])
                           do_member_read(tobjectdef(hdef),getaddr,srsym,p1,again,[])
                         else
                         else
                           { no propertysyms in records (yet) }
                           { no propertysyms in records (yet) }
-                          internalerror(2007012006);
+                          internalerror(2009111510);
                       end
                       end
                     else
                     else
                     { no method pointer }
                     { no method pointer }