* made the tests Android-compatible (use the androidr14 unit instead

   of the jdk15 unit in that case)
  * adjusted testall.sh script so it can also be used to test class
    files compiled for Android (still with the JVM though)

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

tests/test/jvm/classlist.pp

@@ -3,7 +3,7 @@ program classlist;
 {$mode delphi}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
  T1 = class

tests/test/jvm/sort.pp

@@ -4,7 +4,7 @@ program sort;
 {$modeswitch unicodestrings}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 function test : string;
 var

tests/test/jvm/tabs.pp

@@ -4,7 +4,7 @@ program tabs;
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define writeln:=jlsystem.fout.println}

tests/test/jvm/taddset.pp

@@ -25,7 +25,7 @@ Program taddset;
 {$define writeln:=jlsystem.fout.println}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 procedure halt(l: longint);
 begin

tests/test/jvm/taddsetint.pp

@@ -25,7 +25,7 @@ Program taddsetint;
 {$define writeln:=jlsystem.fout.println}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 procedure halt(l: longint);
 begin

tests/test/jvm/tarray2.pp

@@ -3,7 +3,7 @@ Program tarray2;
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define writeln:=jlsystem.fout.println}

tests/test/jvm/tarray3.pp

@@ -3,7 +3,7 @@ program tarray3;
 {$modeswitch exceptions}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
   
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tbyte.pp

@@ -3,7 +3,7 @@ program tbyte;
 {$mode delphi}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 function test: longint;
 var

tests/test/jvm/tbytearrres.pp

@@ -3,7 +3,7 @@ program tbytearrres;
 {$mode delphi}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   ByteArray = array of byte;

tests/test/jvm/tclassproptest.pp

@@ -3,7 +3,7 @@ program tclassproptest;
 {$mode objfpc}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tclassprop = class

tests/test/jvm/tcnvstr1.pp

@@ -33,7 +33,7 @@ program tcnvstr1;
 {$define hasshortstring}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 {$H+}
 
 {$macro on}

tests/test/jvm/tcnvstr3.pp

@@ -19,7 +19,7 @@ program tcnvstr3;
   {$endif}
 {$endif}
 
-uses jdk15;
+uses {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tconst.pp

@@ -3,7 +3,7 @@ program tconst;
 {$mode delphi}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tc = class

tests/test/jvm/tdefpara.pp

@@ -4,7 +4,7 @@ program tdefpara;
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define writeln:=jlsystem.fout.println}

tests/test/jvm/tdynarrec.pp

@@ -3,7 +3,7 @@ Program tdynarrec;
 {$mode objfpc}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tdynrec = record

tests/test/jvm/test.pp

@@ -162,7 +162,7 @@ var
 implementation
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 { package visibility }
 var

tests/test/jvm/testall.sh

@@ -2,125 +2,130 @@
 
 set -ex
 
+RTLDIR=jvm-java
+
 if [ $# -eq 0 ]; then
-  PPC=ppcppc
+  PPC=ppcjvm
 else
   PPC="$1"
+  if [ $# -eq 2 ]; then
+    RTLDIR="$2"
+  fi
 fi
 
 $PPC -O2 -g unsupported
 $PPC -O2 -g testintf
 $PPC -O2 -g nested
 $PPC -O2 -g test
-javac -encoding utf-8 -cp ../../../rtl/units/jvm-java:. JavaClass.java
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. JavaClass
+javac -encoding utf-8 -cp ../../../rtl/units/$RTLDIR:. JavaClass.java
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. JavaClass
 $PPC -O2 -g sort
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. sort
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. sort
 $PPC -O2 -g classmeth
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. classmeth
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. classmeth
 $PPC -O2 -g classlist
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. classlist
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. classlist
 $PPC -O2 -g testansi
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. testansi
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. testansi
 $PPC -O2 -g tcnvstr1
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tcnvstr1
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tcnvstr1
 $PPC -O2 -g tcnvstr3
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tcnvstr3
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tcnvstr3
 $PPC -O2 -g testshort
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. testshort
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. testshort
 $PPC -O2 -g tarray2
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tarray2
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tarray2
 $PPC -O2 -g tarray3
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tarray3
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tarray3
 $PPC -O2 -g tnestproc
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tnestproc
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tnestproc
 $PPC -O2 -g outpara
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. outpara
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. outpara
 $PPC -O2 -g tbytearrres
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tbytearrres
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tbytearrres
 $PPC -O2 -g forw
 $PPC -O2 -g tbyte
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tbyte
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tbyte
 rm -f uenum.ppu
 $PPC -O2 -g tenum
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tenum
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tenum
 $PPC -O2 -g tprop
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tprop
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tprop
 $PPC -O2 -g tprop2
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tprop2
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tprop2
 $PPC -O2 -g tclassproptest
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tclassproptest
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tclassproptest
 $PPC -O2 -g tset3 -dproc
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tset3
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tset3
 $PPC -O2 -g tset3
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tset3
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tset3
 $PPC -O2 -g taddset
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. taddset
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. taddset
 $PPC -O2 -g taddsetint
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. taddsetint
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. taddsetint
 $PPC -O2 -g tformalpara
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tformalpara
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tformalpara
 $PPC -O2 -g tvarpara
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tvarpara
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tvarpara
 $PPC -O2 -g tpvar
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tpvar
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tpvar
 $PPC -O2 -g tpvardelphi
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tpvardelphi
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tpvardelphi
 $PPC -O2 -g tpvarglobal
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tpvarglobal
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tpvarglobal
 $PPC -O2 -g tpvarglobaldelphi
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tpvarglobaldelphi
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tpvarglobaldelphi
 $PPC -O2 -g tvirtclmeth
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tvirtclmeth
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tvirtclmeth
 $PPC -O2 -g tdynarrec
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tdynarrec
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tdynarrec
 $PPC -O2 -g tconst
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tconst
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tconst
 $PPC -O2 -g twith
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. twith
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. twith
 $PPC -O2 -g tint
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tint
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tint
 $PPC -O2 -g ttrig
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. ttrig
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. ttrig
 $PPC -O2 -g ttrunc
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. ttrunc
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. ttrunc
 $PPC -O2 -g tset1
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tset1
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tset1
 $PPC -O2 -g tabs
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tabs
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tabs
 $PPC -O2 -g tintstr
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tintstr
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tintstr
 $PPC -O2 -g trange1
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. trange1
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. trange1
 $PPC -O2 -g trange2
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. trange2
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. trange2
 $PPC -O2 -g trange3
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. trange3
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. trange3
 $PPC -O2 -g tdefpara
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tdefpara
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tdefpara
 $PPC -O2 -g getbit
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. getbit
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. getbit
 $PPC -O2 -g tthreadvar
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tthreadvar
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tthreadvar
 $PPC -O2 -g tstring1
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tstring1
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tstring1
 $PPC -O2 -g tstrreal1
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tstrreal1
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tstrreal1
 $PPC -O2 -g tstrreal2
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tstrreal2
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tstrreal2
 $PPC -O2 -g -B tval
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tval
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tval
 $PPC -O2 -g -B tval5
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tval5
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tval5
 $PPC -O2 -g -B tstring9
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tstring9
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tstring9
 $PPC -O2 -g -B tstr
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tstr
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tstr
 $PPC -O2 -g -B tw20212 
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tw20212
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tw20212
 $PPC -O2 -g -B tdynarrnil
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tdynarrnil
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tdynarrnil
 $PPC -O2 -g -B tnestdynarr
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. tnestdynarr
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. tnestdynarr
 $PPC -O2 -g -B topovl
-java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/jvm-java:. topovl
+java -Dfile.encoding=UTF-8 -cp ../../../rtl/units/$RTLDIR:. topovl

tests/test/jvm/testintf.pp

@@ -41,7 +41,7 @@ type
 implementation
 
   uses
-    jdk15;
+    {$ifdef java}jdk15{$else}androidr14{$endif};
 
   constructor tintfclass.create;
     begin

tests/test/jvm/tformalpara.pp

@@ -10,7 +10,7 @@ procedure main(args: array of string);
 implementation
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tc = class

tests/test/jvm/tint.pp

@@ -6,7 +6,7 @@ program tint;
 {$modeswitch exceptions}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$ifdef VER1_0}
   {$define SKIP_CURRENCY_TEST}

tests/test/jvm/tintstr.pp

@@ -2,7 +2,7 @@ program tintstr;
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define writeln:=jlsystem.fout.println}

tests/test/jvm/tnestedset.pp

@@ -3,7 +3,7 @@ program tnestedset;
 {$mode delphi}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tnestedfpstructenum = (ea,eb,ec);

tests/test/jvm/tnestproc.pp

@@ -3,7 +3,7 @@ program tnestproc;
 {$mode delphi}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 procedure outer(var para: byte);
   const xxx: longint = 5;

tests/test/jvm/tprop.pp

@@ -3,7 +3,7 @@ program tprop;
 {$mode delphi}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tc = class

tests/test/jvm/tprop2.pp

@@ -3,7 +3,7 @@ program tprop2;
 {$mode delphi}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
  tpropclass1 = class

tests/test/jvm/tpvar.pp

@@ -3,7 +3,7 @@ program tpvar;
 {$mode objfpc}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tmprec = record

tests/test/jvm/tpvardelphi.pp

@@ -3,7 +3,7 @@ program tpvardelphi;
 {$mode delphi}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tmprec = record

tests/test/jvm/tpvarglobal.pp

@@ -3,7 +3,7 @@ program tpvarglobal;
 {$mode objfpc}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tmprec = record

tests/test/jvm/tpvarglobaldelphi.pp

@@ -3,7 +3,7 @@ program tpvarglobaldelphi;
 {$mode delphi}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tmprec = record

tests/test/jvm/trange1.pp

@@ -8,7 +8,7 @@ program trange1;
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define writeln:=jlsystem.fout.println}

tests/test/jvm/trange2.pp

@@ -3,7 +3,7 @@ program trange2;
 {$mode objfpc}
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define writeln:=jlsystem.fout.println}

tests/test/jvm/trange3.pp

@@ -4,7 +4,7 @@ program trange3;
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define writeln:=jlsystem.fout.println}

tests/test/jvm/tset1.pp

@@ -9,7 +9,7 @@ program tset1;
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define writeln:=jlsystem.fout.println}

tests/test/jvm/tset3.pp

@@ -3,7 +3,7 @@ program tset3;
 {$modeswitch exceptions}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define writeln:=JLSystem.fout.println}

tests/test/jvm/tstr.pp

@@ -1,7 +1,7 @@
 program tstr;
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tstring1.pp

@@ -2,7 +2,7 @@ program tstring1;
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tstring9.pp

@@ -3,7 +3,7 @@ program tstring9
 {$ifdef fpc}{$mode objfpc}{$h+}{$endif}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tstrreal1.pp

@@ -2,7 +2,7 @@
 program tstrreal1;
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tstrreal2.pp

@@ -2,7 +2,7 @@ program tstrreal2;
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tthreadvar.pp

@@ -4,7 +4,7 @@ program tthreadvar;
 {$modeswitch unicodestrings}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tc = class

tests/test/jvm/ttrig.pp

@@ -3,7 +3,7 @@ program ttrig;
 {$modeswitch exceptions}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define writeln:=JLSystem.fout.println}

tests/test/jvm/ttrunc.pp

@@ -4,7 +4,7 @@ program ttrunc;
 {$modeswitch exceptions}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 

tests/test/jvm/tval.pp

@@ -10,7 +10,7 @@ program tval;
 
 uses
 {$ifdef cpujvm}
-  jdk15,
+  {$ifdef java}jdk15{$else}androidr14{$endif},
 {$endif}
   { longint type, short string }
   tval1,

tests/test/jvm/tval1.pp

@@ -7,7 +7,7 @@ interface
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tval2.pp

@@ -7,7 +7,7 @@ interface
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tval3.pp

@@ -7,7 +7,7 @@ interface
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tval4.pp

@@ -7,7 +7,7 @@ interface
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tvalc.pp

@@ -4,7 +4,7 @@ interface
 
 {$ifdef cpujvm}
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define write:=JLSystem.fout.print}

tests/test/jvm/tvarpara.pp

@@ -3,7 +3,7 @@ program tvarpara;
 {$mode objfpc}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 procedure test(var c: char);
 begin

tests/test/jvm/tvirtclmeth.pp

@@ -3,7 +3,7 @@ program tvirtclmeth;
 {$mode delphi}
 
 uses
-  jdk15;
+  {$ifdef java}jdk15{$else}androidr14{$endif};
 
 type
   tvirtclmethbase = class

tests/test/jvm/tw20212.pp

@@ -4,7 +4,7 @@ program tw20212;
 
 {$ifdef cpujvm}
 uses
- jdk15;
+ {$ifdef java}jdk15{$else}androidr14{$endif};
 
 {$macro on}
 {$define writeln:=JLSystem.fout.println}