Mercurial > repl
view rlm/swank-all.pl @ 7:913acb5a675b
repaired old repl script using changes from dylan
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Thu, 01 Mar 2012 06:28:39 -0700 |
parents | e22ae14fa9d5 |
children | 00524751595b |
line wrap: on
line source
1 #!/usr/bin/perl3 $replP = $ARGV[0];5 @JVM_options =6 ("-verbose:gc",7 "-Xmn500M",8 "-Xms3000M",9 "-Xmx3000M",10 "-server");12 @classpath_projects =13 ("/home/r/proj/rlm/src",14 "/home/r/proj/dylan/src",15 "/home/r/proj/curry/src",16 "/home/r/java/lib/*",17 "/home/r/proj/aurellem/src",18 "/home/r/proj/pokemon-types/src",19 "/home/r/proj/cortex/src",20 "/home/r/proj/cortex/assets",21 "/home/r/proj/abomination/src",22 "/home/r/proj/abomination/classes",23 "/home/r/proj/pony/src",24 "/home/r/proj/coderloop/src",25 "/home/r/proj/audio-send/java/dist/audio-send.jar",26 "/home/r/proj/audio-send/java/dist/audio-send-natives.jar",27 "/home/r/proj/jmeCapture/dist/jmeCapture.jar"28 );30 @classpath_libs =31 ("/home/r/java/incanter/*",32 "/home/r/java/enlive/src",33 "/home/r/java/lp_solve-5.5/lib/lpsolve55j.jar",34 "/home/r/proj/jMonkeyEngine3/dist/lib/eventbus.jar",35 "/home/r/proj/jMonkeyEngine3/dist/lib/jinput.jar",36 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-blender.jar",37 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-core.jar",38 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-desktop.jar",40 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-jogg.jar",41 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-lwjgl.jar",42 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-lwjgl-natives.jar",43 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-niftygui.jar",44 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-plugins.jar",45 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-terrain.jar",46 "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-testdata.jar",47 "/home/r/proj/jMonkeyEngine3/dist/lib/j-ogg-oggd.jar",48 "/home/r/proj/jMonkeyEngine3/dist/lib/j-ogg-vorbisd.jar",49 "/home/r/proj/jMonkeyEngine3/dist/lib/lwjgl.jar",50 "/home/r/proj/jMonkeyEngine3/dist/lib/nifty-default-controls.jar",51 "/home/r/proj/jMonkeyEngine3/dist/lib/nifty-examples.jar",52 "/home/r/proj/jMonkeyEngine3/dist/lib/nifty.jar",53 "/home/r/proj/jMonkeyEngine3/dist/lib/nifty-style-black.jar",54 "/home/r/proj/jMonkeyEngine3/dist/lib/noise-0.0.1-SNAPSHOT.jar",55 "/home/r/proj/jMonkeyEngine3/dist/lib/stack-alloc.jar",56 "/home/r/proj/jMonkeyEngine3/dist/lib/vecmath.jar",57 "/home/r/proj/jMonkeyEngine3/dist/lib/xmlpull-xpp3.jar",59 ### physics, choose jbullet or bullet61 # jbullet -- has... special.... cone joints62 # "/home/r/proj/jMonkeyEngine3/dist/lib/jbullet.jar",63 # "/home/r/proj/jMonkeyEngine3/dist/lib/jME3-jbullet.jar",65 # bullet66 "/home/r/proj/jMonkeyEngine3/dist/opt/native-bullet/jME3-bullet.jar",67 "/home/r/proj/jMonkeyEngine3/dist/opt/native-bullet/jME3-bullet-natives.jar",69 );71 @C_libs =72 ("/home/r/java/lp_solve-5.5/lpsolve55/bin/ux64",73 "/home/r/java/lp_solve-5.5-java/lib/ux64");76 $JVM_options = join " ", @JVM_options;77 $classpath_projects = join ":", @classpath_projects;78 $classpath_libs = join ":", @classpath_libs;79 $C_libs = join ":", @C_libs;81 $swank_launch ="clojure.main";82 $swank_launch .= " -e ";83 $swank_launch .= '"';84 $swank_launch .= "(do (require 'swank.swank)";85 $swank_launch .= "(require 'rlm.rlm-commands)";86 $swank_launch .= "(swank.swank/start-repl 4005))";87 $swank_launch .= '"';89 $repl_launch = "clojure.main";91 $clojure_command = $swank_launch;93 if ($replP eq "--repl") {$clojure_command = $repl_launch;}95 $command = "java $JVM_options -cp $classpath_projects:$classpath_libs" .96 " -Djava.library.path=$C_libs $clojure_command";98 print "$command\n";100 system($command);