Browse Source

* fixed compilation after r25847 (mantis #25237)

git-svn-id: trunk@25870 -
Jonas Maebe 11 years ago
parent
commit
c693a91e18
2 changed files with 2 additions and 2 deletions
  1. 1 1
      compiler/jvm/njvmcnv.pas
  2. 1 1
      compiler/jvm/njvmflw.pas

+ 1 - 1
compiler/jvm/njvmcnv.pas

@@ -1083,7 +1083,7 @@ implementation
             but do not allow records to be directly typecasted into class/
             pointer types (you have to use FpcBaseRecordType(@rec) instead) }
           if not is_record(fromdef) and
-             is_related(fromdef,todef) then
+             def_is_related(fromdef,todef) then
             exit;
           if check_type_equality(fromdef,todef) then
             exit;

+ 1 - 1
compiler/jvm/njvmflw.pas

@@ -55,7 +55,7 @@ implementation
 
     uses
       verbose,globals,systems,globtype,constexp,
-      symconst,symdef,symsym,aasmtai,aasmdata,aasmcpu,defutil,jvmdef,
+      symconst,symdef,symsym,aasmtai,aasmdata,aasmcpu,defutil,jvmdef,defcmp,
       procinfo,cgbase,pass_1,pass_2,parabase,
       cpubase,cpuinfo,
       nbas,nld,ncon,ncnv,