Просмотр исходного кода

* the symbol parsed for "specialize" does not need to be a type; it could be a procsym or some other type (e.g. a constant of the same name in a third unit)

git-svn-id: trunk@39233 -
svenbarth 7 лет назад
Родитель
Сommit
22a5e5e4ee
1 измененных файлов с 1 добавлено и 2 удалено
  1. 1 2
      compiler/pexpr.pas

+ 1 - 2
compiler/pexpr.pas

@@ -2837,8 +2837,7 @@ implementation
 
                if isspecialize then
                  begin
-                   if not assigned(srsym) or
-                       (srsym.typ<>typesym) then
+                   if not assigned(srsym) then
                      begin
                        identifier_not_found(orgstoredpattern,tokenpos);
                        srsym:=generrorsym;