Explorar o código

* use symbol type instead of sp_static flag to determine whether a final
symbol can only be assigned in the constructor or class constructor

git-svn-id: branches/jvmbackend@18611 -

Jonas Maebe %!s(int64=14) %!d(string=hai) anos
pai
achega
3320fee51c
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/htypechk.pas

+ 1 - 1
compiler/htypechk.pas

@@ -1098,7 +1098,7 @@ implementation
             else if vs.varspez=vs_final then
               begin
                 if (current_procinfo.procdef.owner=vs.owner) then
-                  if sp_static in vs.symoptions then
+                  if vs.typ=staticvarsym then
                     result:=current_procinfo.procdef.proctypeoption=potype_class_constructor
                   else
                     result:=current_procinfo.procdef.proctypeoption=potype_constructor;