Mercurial > repl
view swank-all.pl @ 2:1579e83305d7
new and better perl script
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Sun, 11 Dec 2011 19:58:57 -0700 |
parents | |
children | c0a7582262fd |
line wrap: on
line source
1 #!/usr/bin/perl3 @JVM_options =4 ("-verbose:gc",5 "-Xmn500M",6 "-Xms3000M",7 "-Xmx3000M",8 "-server");10 @classpath_projects =11 ("/home/r/proj/rlm/src",12 "/home/r/proj/curry/src",13 "/home/r/java/lib/*",14 "/home/r/proj/aurellem/src",15 "/home/r/proj/pokemon-types/src",16 "/home/r/proj/cortex/src",17 "/home/r/proj/cortex/assets",18 "/home/r/proj/abomination/src",19 "/home/r/proj/abomination/classes",20 "/home/r/proj/coderloop/src",21 "/home/r/proj/audio-send/java/dist/audio-send.jar",22 "/home/r/proj/audio-send/java/dist/audio-send-natives.jar",23 "/home/r/proj/jmeCapture/dist/jmeCapture.jar"24 );26 @classpath_libs =27 ("/home/r/java/incanter/*",28 "/home/r/java/enlive/src",29 "/home/r/java/lp_solve-5.5/lib/lpsolve55j.jar",30 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-core.jar",31 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-desktop.jar",32 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-jbullet.jar",33 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-lwjgl-natives.jar",34 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-lwjgl.jar",35 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-testdata.jar",36 "/home/r/proj/jMonkeyEngine3/dist/opt/jME3-tests.jar",37 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-jogg.jar",38 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-blender.jar",39 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-plugins.jar",40 "/home/r/proj/jMonkeyEngine3/dist/lib/jbullet.jar",41 "/home/r/proj/jMonkeyEngine3/dist/lib/lwjgl.jar",42 "/home/r/proj/jMonkeyEngine3/dist/lib/vecmath.jar",43 "/home/r/proj/jMonkeyEngine3/dist/lib/j-ogg-oggd.jar",44 "/home/r/proj/jMonkeyEngine3/dist/lib/j-ogg-vorbisd.jar",46 );48 @C_libs =49 ("/home/r/java/lp_solve-5.5/lpsolve55/bin/ux64",50 "/home/r/java/lp_solve-5.5-java/lib/ux64");53 $JVM_options = join " ", @JVM_options;54 $classpath_projects = join ":", @classpath_projects;55 $classpath_libs = join ":", @classpath_libs;56 $C_libs = join ":", @C_libs;58 $clojure_launch ="clojure.main";59 $clojure_launch .= " -e ";60 $clojure_launch .= '"';61 $clojure_launch .= "(do (require 'swank.swank)";62 $clojure_launch .= "(require 'rlm.rlm-commands)";63 $clojure_launch .= "(swank.swank/start-repl 4005))";64 $clojure_launch .= '"';66 $command = "java ".$JVM_options." -cp ".$classpath_projects.":".$classpath_libs67 ." -Djava.library.path=".$C_libs." ".$clojure_launch;69 print "$command\n";71 system($command);