disable all breakpoints initially
authorRalph Ronnquist <ralph.ronnquist@gmail.com>
Thu, 17 Jun 2021 06:55:08 +0000 (16:55 +1000)
committerRalph Ronnquist <ralph.ronnquist@gmail.com>
Thu, 17 Jun 2021 06:55:08 +0000 (16:55 +1000)
debug.sh

index 4c4f4fd696e15a42969b083a16c1fe28ae5f097c..5d630ee02aa8a8773545a93819744559e6f4a1af 100755 (executable)
--- a/debug.sh
+++ b/debug.sh
@@ -15,7 +15,6 @@ echo "break *${RET[0]}" >> gdbinit
 #      ;; rax = cfa of called word
 #      ;; rsi = cell* of next forth word
 #      ;; [$rsp] = from where the call was
-
 cat <<EOF >> gdbinit
 commands $((NBR+1))
 print (void*) \$rsp
@@ -24,6 +23,10 @@ print (char*)((*((void**)(*((void**)\$rsi)-16)))+32)
 end
 EOF
 
+echo disable $NBR >> gdbinit
+echo disable $((NBR+1)) >> gdbinit
+
+
 DS="$(grep "${PFX}DS_TOP:" rrqforth.map | sed 's/ .*//')"
 RS="$(grep "${PFX}RS_TOP:" rrqforth.map | sed 's/ .*//')"
 cat <<EOF >> gdbinit