From db04688faa20f3576257c0fe41752ec435beab9a Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Mon, 20 Feb 2017 00:05:25 -0800 Subject: Import Upstream version 5c3 --- .gdbinit | 16 +++++++++++++++- 1 file changed, 15 insertions(+), 1 deletion(-) (limited to '.gdbinit') diff --git a/.gdbinit b/.gdbinit index 6d39779..343b7f1 100644 --- a/.gdbinit +++ b/.gdbinit @@ -64,7 +64,7 @@ define scm call newline(sys_protects[2]),(void)0 end -define load +define lload if (errjmp_bad) echo sorry, errjmp_bad\n else @@ -94,3 +94,17 @@ end document cdr CDR of $ end + +define disp + call iprin1($arg0, sys_protects[2], 0) + echo \n +end + +define writ + call iprin1($arg0, sys_protects[2], 1) + echo \n +end + + + + -- cgit v1.2.3