diff options
Diffstat (limited to 'gdbinit')
-rw-r--r-- | gdbinit | 10 |
1 files changed, 10 insertions, 0 deletions
@@ -1,7 +1,13 @@ +# -*- GDB-Script -*- + define newline call (void)scm_newline (scm_current_error_port ()) end +define pp + call (void)scm_call_1 (scm_variable_ref (scm_c_module_lookup (scm_c_resolve_module ("ice-9 pretty-print"), "pretty-print")), $arg0) +end + define gdisplay call (void)scm_display ($arg0, scm_current_error_port ()) newline @@ -194,3 +200,7 @@ define vmstack nextframe end end + +define inst + p scm_instruction_table[$arg0] +end |