various improvements

[rrq/rrqforth.git] / debug.sh

diff --git a/debug.sh b/debug.sh
index 9b64b4970021df19eeedde13b0ca9530669bb21b..4c4f4fd696e15a42969b083a16c1fe28ae5f097c 100755 (executable)
--- a/debug.sh
+++ b/debug.sh
@@ -19,8 +19,8 @@ echo "break *${RET[0]}" >> gdbinit
 cat <<EOF >> gdbinit
 commands $((NBR+1))
 print (void*) \$rsp
-print (((char*)(*(((void**)\$rax)-2)))+32)
 print (void*) \$rsi
+print (char*)((*((void**)(*((void**)\$rsi)-16)))+32)
 end
 EOF