smalltalk
branchjv
changeset 1512 507674c6d84b
parent 1450 58a390b93aa3
child 1525 0275f69b9d05
--- a/smalltalk	Fri Jun 02 22:26:06 2017 +0100
+++ b/smalltalk	Mon Jun 05 22:10:20 2017 +0100
@@ -119,6 +119,7 @@
    -X dir ................. use stx from dir instead of default (PATH)
    --ldd .................. show which shared libraries are used
    --gdb .................. run with gdb-Debugger (type r in debugger to start)
+   --gdb .................. run with Visual / VM Debugger
    --cgdb ................. run with cgdb-Debugger (type r in debugger to start)
    --callgrind ............ run under callgrind profiler tool with profiling off -
                             use this to profile some benchmark
@@ -149,6 +150,20 @@
     DEBUGGER="gdb --args"
 fi
 
+if [ "$1" = "--vdb" ]
+then
+    if which "vdb"; then
+        VDB=vdb
+    elif [ -x "$STX_BIN_DIR/../../../jv/vdb/application/vdb" ]; then
+        VDB="$STX_BIN_DIR/../../../jv/vdb/application/vdb"
+    else
+        echo "$0: could not find Visual / VM Debugger (vdb)"
+        exit 1
+    fi
+    shift
+    DEBUGGER="$VDB"
+fi
+
 if [ "$1" = "--cgdb" ]
 then
     shift