summaryrefslogtreecommitdiff
path: root/utils/pvm/debugger.emacs
diff options
context:
space:
mode:
Diffstat (limited to 'utils/pvm/debugger.emacs')
-rw-r--r--utils/pvm/debugger.emacs37
1 files changed, 37 insertions, 0 deletions
diff --git a/utils/pvm/debugger.emacs b/utils/pvm/debugger.emacs
new file mode 100644
index 0000000000..ee053ca7b4
--- /dev/null
+++ b/utils/pvm/debugger.emacs
@@ -0,0 +1,37 @@
+#!/bin/csh -f
+#
+# debugger.csh
+#
+# this script is invoked by the pvmd when a task is spawned with
+# the PvmTaskDebug flag set. it execs an xterm with script
+# debugger2 running inside.
+#
+# 06 Apr 1993 Manchek
+#
+
+if ($#argv < 1) then
+ echo "usage: debugger command [args]"
+ exit 1
+endif
+
+# scratch file for debugger commands
+
+set TEMPCMD=gdb$$.cmd
+set TEMPLISP=gdb$$.el
+
+# default debugger and flags
+
+#
+# run the debugger
+#
+
+echo run $argv[2-] > $TEMPCMD
+echo "(gdb "'"'"$argv[1] -q -x $TEMPCMD"'")' > $TEMPLISP
+
+emacs -l $TEMPLISP
+
+#rm -f $TEMPCMD $TEMPLISP
+
+exit 0
+
+