7d50e61c7f
* Another big chunk of v4-require-isms * Allow `#lang framework/keybinding-lang' for keybinding files * Move hierlist sources into "mrlib/hierlist", leave stub behind svn: r10689
19 lines
471 B
Scheme
19 lines
471 B
Scheme
(module installer mzscheme
|
|
(require profj/compile)
|
|
(provide installer)
|
|
|
|
(define (installer plthome)
|
|
(let ([java.test (build-path
|
|
(collection-path "profj" "libs" "java" "tester"))])
|
|
(let ([javac
|
|
(lambda (file)
|
|
(parameterize ([current-load-relative-directory
|
|
java.test])
|
|
(compile-java 'file
|
|
'file
|
|
'full
|
|
(build-path java.test file)
|
|
#f
|
|
#f)))])
|
|
(javac "TestBase.djava")))))
|