* Improved TESTALL.BAT file for JVM tests

This commit is contained in:
J. Gareth "Curious Kit" Moreton 2022-06-08 20:23:11 +01:00 committed by Jonas Maebe
parent ec6f328822
commit 2d8b10a5d8

View File

@ -1,334 +1,180 @@
del /s /q org
@echo off
DEL /S /Q org > NUL 2>&1
ppcjvm -O2 -g unsupported
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g testintf
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g nested
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g test
if %errorlevel% neq 0 exit /b %errorlevel%
javac -encoding utf-8 -cp ..\..\..\rtl\units\jvm-java;. JavaClass
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. JavaClass
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g sort
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. sort
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g classmeth
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. classmeth
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g classlist
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. classlist
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g testansi
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. testansi
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tcnvstr1
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tcnvstr1
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tcnvstr3
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tcnvstr3
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g testshort
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. testshort
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tarray2
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tarray2
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tarray3
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tarray3
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tnestproc
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tnestproc
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g outpara
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. outpara
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tbytearrres
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tbytearrres
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g forw
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tbyte
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tbyte
if %errorlevel% neq 0 exit /b %errorlevel%
del uenum.ppu
ppcjvm -O2 -g -CTenumfieldinit tenum
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tenum
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tenum2
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tenum2
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tprop
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tprop2
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop2
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tclassproptest
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tclassproptest
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tset3 -dproc
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tset3
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tset3
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tset3
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g taddset
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. taddset
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g taddsetint
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. taddsetint
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tformalpara
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tformalpara
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tvarpara
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tvarpara
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tpvar
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tpvar
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tpvardelphi
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tpvardelphi
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tpvarglobal
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tpvarglobal
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tpvarglobaldelphi
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tpvarglobaldelphi
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tvirtclmeth
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tvirtclmeth
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tdynarrec
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tdynarrec
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tconst
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tconst
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g twith
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. twith
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tint
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tint
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g ttrig
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. ttrig
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g ttrunc
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. ttrunc
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tset1
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tset1
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tabs
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tabs
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tintstr
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tintstr
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g trange1
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. trange1
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g trange2
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. trange2
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g trange3
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. trange3
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tdefpara
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tdefpara
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g getbit
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. getbit
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tthreadvar
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tthreadvar
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tstring1
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tstring1
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tstrreal1
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;.tstrreal1
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g tstrreal2
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tstrreal2
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B tval
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tval
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B tval5
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tval5
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B tstring9
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tstring9
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B tstr
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tstr
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B tw20212
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tw20212
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B tdynarrnil
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tdynarrnil
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B tnestdynarr
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tnestdynarr
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B topovl
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. topovl
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B tassert
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. -Sa tassert
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B taddbool
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. -Sa TAddBool
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B tsetansistr
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. -Sa tsetansistr
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B tw22807
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. -Sa tw22807
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B ttincdec.pp
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. -Sa ttincdec
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -CTautogetterprefix=Get tprop3.pp
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -CTautogetterprefix=Get tprop4.pp
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. -Sa tprop4
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B tw24089
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. -Sa tw24089
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -CTautosetterprefix=Set ujsetter
if %errorlevel% neq 0 exit /b %errorlevel%
javac -encoding utf-8 -cp ..\..\..\rtl\units\jvm-java;. tjsetter.java
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. -Sa tjsetter
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -Sa tlowercaseproc
if %errorlevel% neq 0 exit /b %errorlevel%
javac -encoding utf-8 -cp ..\..\..\rtl\units\jvm-java;. tjavalowercaseproc.java
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tjavalowercaseproc
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -CTinitlocals tinitvar
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. org.freepascal.test.tinitvar.tinitvar
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -CTinitlocals tsmallintarr
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tsmallintarr
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -vh toverload
if %errorlevel% eq 0 exit /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g unsupported || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g testintf || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g nested || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g test || EXIT /b 1
javac -encoding utf-8 -cp ..\..\..\rtl\units\jvm-java;. JavaClass.java || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. JavaClass || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g sort || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. sort || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g classmeth || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. classmeth || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g classlist || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. classlist || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g testansi || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. testansi || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tcnvstr1 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tcnvstr1 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tcnvstr3 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tcnvstr3 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g testshort || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. testshort || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tarray2 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tarray2 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tarray3 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tarray3 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tnestproc || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tnestproc || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g outpara || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. outpara || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tbytearrres || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tbytearrres || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g forw || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tbyte || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tbyte || EXIT /b 1
DEL /Q uenum.ppu > NUL 2>&1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -CTenumfieldinit tenum || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tenum || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tenum2 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tenum2 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tprop || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tprop2 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop2 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tclassproptest || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tclassproptest || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tset3 -dproc || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tset3 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tset3 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tset3 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g taddset || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. taddset || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g taddsetint || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. taddsetint || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tformalpara || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tformalpara || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tvarpara || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tvarpara || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tpvar || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tpvar || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tpvardelphi || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tpvardelphi || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tpvarglobal || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tpvarglobal || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tpvarglobaldelphi || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tpvarglobaldelphi || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tvirtclmeth || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tvirtclmeth || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tdynarrec || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tdynarrec || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tconst || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tconst || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g twith || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. twith || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tint || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tint || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g ttrig || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. ttrig || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g ttrunc || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. ttrunc || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tset1 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tset1 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tabs || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tabs || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tintstr || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tintstr || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g trange1 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. trange1 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g trange2 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. trange2 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g trange3 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. trange3 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tdefpara || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tdefpara || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g getbit || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. getbit || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tthreadvar || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tthreadvar || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tstring1 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tstring1 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tstrreal1 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tstrreal1 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g tstrreal2 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tstrreal2 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B tval || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tval || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B tval5 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tval5 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B tstring9 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tstring9 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B tstr || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tstr || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B tw20212 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tw20212 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B tdynarrnil || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tdynarrnil || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B tnestdynarr || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tnestdynarr || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B topovl || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. topovl || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa tassert || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tassert || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa taddbool || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. TAddBool || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa tsetansistr || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tsetansistr || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa tw22807 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tw22807 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa ttincdec.pp || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. ttincdec || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -CTautogetterprefix=Get tprop3.pp || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -CTautogetterprefix=Get tprop4.pp || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop4 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa tw24089 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tw24089 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa -CTautosetterprefix=Set ujsetter || EXIT /b 1
javac -encoding utf-8 -cp ..\..\..\rtl\units\jvm-java;. tjsetter.java || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tjsetter || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa tlowercaseproc || EXIT /b 1
javac -encoding utf-8 -cp ..\..\..\rtl\units\jvm-java;. tjavalowercaseproc.java || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tjavalowercaseproc || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -CTinitlocals tinitvar || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. org.freepascal.test.tinitvar.tinitvar || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -CTinitlocals tsmallintarr || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tsmallintarr || EXIT /b 1
' Negative tests - successful compilation (ERRORLEVEL 0) = failure
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -vh toverload && EXIT /b 1
echo " ** Compilation failed as expected"
ppcjvm -O2 -g -B toverload2
if %errorlevel% eq 0 exit /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B toverload2 && EXIT /b 1
echo " ** Compilation failed as expected"
ppcjvm -O2 -g -B -CTinitlocals tptrdynarr
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tptrdynarr
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -Sa tprop5a
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop5a
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -Sa tprop5a -CTautosetterprefix=Set -CTautogetterprefix=Get
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop5a
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -Sa tprop6a
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop6a
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -Sa tprop6a -CTautosetterprefix=Set -CTautogetterprefix=Get
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop6a
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -CTinitlocals tsetstring
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tsetstring
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -Sa tnestcallpass1
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -CTinitlocals tformalclass
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tformalclass
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -CTinitlocals tprocvaranon
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprocvaranon
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -CTinitlocals tw29585
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tw29585
if %errorlevel% neq 0 exit /b %errorlevel%
ppcjvm -O2 -g -B -CTinitlocals tstring
if %errorlevel% neq 0 exit /b %errorlevel%
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tstring
if %errorlevel% neq 0 exit /b %errorlevel%
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -CTinitlocals tptrdynarr || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tptrdynarr || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa tprop5a || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop5a || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa tprop5a -CTautosetterprefix=Set -CTautogetterprefix=Get || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop5a || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa tprop6a || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop6a || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa tprop6a -CTautosetterprefix=Set -CTautogetterprefix=Get || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprop6a || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -CTinitlocals tsetstring || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tsetstring || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -Sa tnestcallpass1 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -CTinitlocals tformalclass || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tformalclass || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -CTinitlocals tprocvaranon || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tprocvaranon || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -CTinitlocals tw29585 || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tw29585 || EXIT /b 1
..\..\..\compiler\ppcjvm -Fu..\..\..\rtl\units\jvm-java -O2 -g -B -CTinitlocals tstring || EXIT /b 1
java -Dfile.encoding=UTF-8 -cp ..\..\..\rtl\units\jvm-java;. tstring || EXIT /b 1
ECHO ----------------
ECHO JVM tests passed
ECHO ----------------