Explorar o código

* call getbasedef before getting the classdef of an enum (only the basedef
has an associated class)

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

Jonas Maebe %!s(int64=13) %!d(string=hai) anos
pai
achega
622eb4b782
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/jvm/njvmmem.pas

+ 1 - 1
compiler/jvm/njvmmem.pas

@@ -409,7 +409,7 @@ implementation
           begin
            if (right.location.loc<>LOC_CONSTANT) then
              begin
-               psym:=search_struct_member(tenumdef(right.resultdef).classdef,'FPCORDINAL');
+               psym:=search_struct_member(tenumdef(right.resultdef).getbasedef.classdef,'FPCORDINAL');
                if not assigned(psym) or
                   (psym.typ<>procsym) or
                   (tprocsym(psym).ProcdefList.count<>1) then