[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
guile/guile-core HACKING
From: |
Thien-Thi Nguyen |
Subject: |
guile/guile-core HACKING |
Date: |
Fri, 31 Aug 2001 21:09:06 -0700 |
CVSROOT: /cvs
Module name: guile
Changes by: Thien-Thi Nguyen <address@hidden> 01/08/31 21:09:05
Modified files:
guile-core : HACKING
Log message:
(Sample GDB Initialization File): New section.
CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/HACKING.diff?cvsroot=OldCVS&tr1=1.58&tr2=1.59&r1=text&r2=text
Patches:
Index: guile/guile-core/HACKING
diff -u guile/guile-core/HACKING:1.58 guile/guile-core/HACKING:1.59
--- guile/guile-core/HACKING:1.58 Thu Aug 30 11:23:35 2001
+++ guile/guile-core/HACKING Fri Aug 31 21:09:05 2001
@@ -70,6 +70,50 @@
different.
+Sample GDB Initialization File=========================================
+
+Here is a sample .gdbinit posted by Bill Schottstaedt (modified to
+use `set' instead of `call' in some places):
+
+ define gp
+ set gdb_print($arg0)
+ print gdb_output
+ end
+ document gp
+ Executes (object->string arg)
+ end
+
+ define ge
+ call gdb_read($arg0)
+ call gdb_eval(gdb_result)
+ set gdb_print(gdb_result)
+ print gdb_output
+ end
+ document ge
+ Executes (print (eval (read arg))): ge "(+ 1 2)" => 3
+ end
+
+ define gh
+ call g_help(scm_str2symbol($arg0), 20)
+ set gdb_print($1)
+ print gdb_output
+ end
+ document gh
+ Prints help string for arg: gh "enved-target"
+ end
+
+Bill further writes:
+
+ so in gdb if you see something useless like:
+
+ #32 0x081ae8f4 in scm_primitive_load (filename=1112137128) at load.c:129
+
+ You can get the file name with gp:
+
+ (gdb) gp 1112137128
+ $1 = 0x40853fac "\"/home/bil/test/share/guile/1.5.0/ice-9/session.scm\""
+
+
Contributing Your Changes ============================================
- If you have put together a change that meets the coding standards
- guile/guile-core HACKING,
Thien-Thi Nguyen <=