Bläddra i källkod

* fixed fully qualified class names passed to JLClass.forName()
(components must be separated by '.', not '/')

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

Jonas Maebe 14 år sedan
förälder
incheckning
687e9fb6dc
1 ändrade filer med 2 tillägg och 1 borttagningar
  1. 2 1
      compiler/jvm/njvmcnv.pas

+ 2 - 1
compiler/jvm/njvmcnv.pas

@@ -92,7 +92,7 @@ interface
 implementation
 
    uses
-      verbose,globals,globtype,constexp,
+      verbose,globals,globtype,constexp,cutils,
       symbase,symconst,symdef,symsym,symtable,aasmbase,aasmdata,
       defutil,defcmp,jvmdef,
       cgbase,cgutils,pass_1,pass_2,
@@ -413,6 +413,7 @@ implementation
                  encodedtype:=jvmencodetype(pvs.vardef,false);
                  if pushaddr then
                    encodedtype:='['+encodedtype;
+                 replace(encodedtype,'/','.');
                  newpara:=ccallnode.createinternmethod(cloadvmtaddrnode.create(ctypenode.create(jlclass)),'FORNAME',
                    ccallparanode.create(cstringconstnode.createstr(encodedtype),nil));
                end