[0001]
[0002]
[0003]
[0004]
[0005]
[0006]
[0007]
[0008]
[0009]
[0010]
[0011]
[0012]
[0013]
[0014]
[0015]
[0016]
[0017]
[0018]
[0019]
[0020]
[0021]
[0022]
[0023]
[0024]
[0025]
[0026]
[0027]
[0028]
[0029]
[0030]
[0031]
[0032]
[0033]
[0034]
[0035]
[0036]

$!'f$verify(0)
$!(prepare either Java5 or Java6, depending on what we find installed)
$ jsetup = f$edit(f$search("SYS$MANAGER:JAVA$150_SETUP.COM"),"COLLAPSE")
$ if f$length(jsetup) .eq. 0 then jsetup = f$edit(f$search("SYS$MANAGER:JAVA$60_SETUP.COM"),"COLLAPSE")
$ if f$length(jsetup) .eq. 0 then exit 44
$ @'jsetup'
$ set noon
$!
$ if p1 .nes. ""
$ then
$    call javacomp "''p1'"
$    exit
$ endif
$!
$ call javacomp "CGIplus.java"
$ call javacomp "dumpCGI.java"
$ call javacomp "hi1CGI.java"
$ call javacomp "hi1CGIplus.java"
$ call javacomp "hi2CGI.java"
$ call javacomp "hi2CGIplus.java"
$ call javacomp "postCGI.java"
$ call javacomp "postCGIplus.java"
$ exit
$!
$ javacomp: subroutine
$!
$ set noon
$ classpath = f$trnlnm("classpath") + ":/wasd_root/script/"
$ target = "/wasd_root/script/"
$!
$ set verify
$ javac -classpath "''classpath'" -d "''target'" "''p1'"
$!'f$verify(0)
$!
$ exit
$ endsubroutine