[Jscheme-user] configuring import & classpath lists

[Geoffrey K. <ge...@kn...>]

I needed a way to add a bunch of JARs to my classpath, and I wanted  
to be able to configure where they lived.  The following small  
example is what I came up with.  The idea is that a configuration  
driver could build up jars-to-add.

Geoffrey
--
Geoffrey S. Knauth | http://knauth.org/gsk

-----

(load "elf/classpath.scm")

(define (list-full-jar-names dir name-list)
   (map
    (lambda (name)
      (string-append dir "/" name ".jar"))
    name-list))

(define jars-to-add
   (list-full-jar-names
    (string-append (System.getProperty "user.home") "/lib/jar")
    (list "lava3-core" "lava3-printf")))

(for-each (lambda (j) (addClasspathUrl j)) jars-to-add)