Index: /trunk/ccl/lisp-kernel/darwinx8664/.gdbinit
===================================================================
--- /trunk/ccl/lisp-kernel/darwinx8664/.gdbinit	(revision 6213)
+++ /trunk/ccl/lisp-kernel/darwinx8664/.gdbinit	(revision 6214)
@@ -6,4 +6,9 @@
 set $temp=*((long *)((long)($arg0-6)))
 x86_lisp_string $temp
+end
+
+define gtra
+br *$r10
+cont
 end
 
