Skip to content
Browse files

Added support for Gauche/gosh (http://practical-scheme.net/gauche/).

(You install gauche easily by doing sudo port install gauche.)
  • Loading branch information...
1 parent 92741f7 commit 28c2a640c499b791a814dc947847fdafca752b8e @akafred akafred committed Mar 5, 2010
Showing with 11 additions and 4 deletions.
  1. +3 −1 Commands/Evaluate selection.plist
  2. +3 −1 Commands/Run Script.plist
  3. +5 −2 Commands/Start Interpreter.plist
View
4 Commands/Evaluate selection.plist
@@ -8,7 +8,7 @@
<string># Evaluate the current seletion in our Scheme interpreter
#
# The interpreter you use should be set in the environment
-# variable TM_SCHEME_EVALUATOR
+# variable TM_SCHEME_INTERPRETER
INTERPRET=${TM_SCHEME_INTERPRETER:=csi}
CMD=$(basename "$INTERPRET")
@@ -31,6 +31,8 @@ if [ $CMD == "mzscheme" ] ; then
fi
elif [ $CMD == "csi" ] ; then
"$INTERPRET" -q &lt; /dev/stdin
+elif [ $CMD == "gosh" ] ; then
+ "$INTERPRET" -q &lt; /dev/stdin
fi</string>
<key>fallbackInput</key>
<string>line</string>
View
4 Commands/Run Script.plist
@@ -14,13 +14,15 @@ require ENV["TM_SUPPORT_PATH"] + "/lib/escape"
TextMate.save_current_document
TextMate::Executor.make_project_master_current_document
-interpreters = ["mzscheme", "csi", "guile"]
+interpreters = ["mzscheme", "csi", "guile", "gosh"]
args = []
args &lt;&lt; (ENV["TM_SCHEME"] || interpreters.select{|ii| ENV["PATH"].split(":").any?{|dd| File.executable? File.join(dd, ii)}}.first)
case args[0]
when "mzscheme"
args &lt;&lt; "-e" &lt;&lt; '(require (lib "errortrace.ss" "errortrace"))' &lt;&lt; "-r"
+when "gosh"
+ # nothing
else
args &lt;&lt; "-s"
end
View
7 Commands/Start Interpreter.plist
@@ -1,11 +1,14 @@
<?xml version="1.0" encoding="UTF-8"?>
-<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<key>beforeRunningCommand</key>
<string>nop</string>
<key>command</key>
- <string>osascript -e "tell application \"Terminal\"
+ <string># The interpreter you use should be set in the environment
+# variable TM_SCHEME_INTERPRETER
+
+osascript -e "tell application \"Terminal\"
do script \"clear; ${TM_SCHEME_INTERPRETER:=csi}\"
activate
end tell"

0 comments on commit 28c2a64

Please sign in to comment.
Something went wrong with that request. Please try again.