* .gdbinit: Rename to gdbinit.in.
* gdbinit.in: New file,
* configure.in: Generate .gdbinit from gdbinit.in.
* configure: Regenerated.
* Makefile.in (distclean): Always remove .gdbinit.
From-SVN: r39759
+++ /dev/null
-define pr
-set debug_rtx ($)
-end
-
-document pr
-Print the full structure of the rtx that is $.
-Works only when an inferior is executing.
-end
-
-define prl
-set debug_rtx_list ($, debug_rtx_count)
-end
-
-document prl
-Print the full structure of all rtx insns beginning at $.
-Works only when an inferior is executing.
-Uses variable debug_rtx_count to control number of insns printed:
- debug_rtx_count > 0: print from $ on.
- debug_rtx_count < 0: print a window around $.
-
-There is also debug_rtx_find (rtx, uid) that will scan a list for UID and print
-it using debug_rtx_list. Usage example: set $foo=debug_rtx_find(first, 42)
-end
-
-define pt
-set debug_tree ($)
-end
-
-document pt
-Print the full structure of the tree that is $.
-Works only when an inferior is executing.
-end
-
-define ptc
-output (enum tree_code) $.common.code
-echo \n
-end
-
-document ptc
-Print the tree-code of the tree node that is $.
-end
-
-define pdn
-output $.decl.name->identifier.pointer
-echo \n
-end
-
-document pdn
-Print the name of the decl-node that is $.
-end
-
-define ptn
-output $.type.name->decl.name->identifier.pointer
-echo \n
-end
-
-document ptn
-Print the name of the type-node that is $.
-end
-
-define prc
-output (enum rtx_code) $.code
-echo \ (
-output $.mode
-echo )\n
-end
-
-document prc
-Print the rtx-code and machine mode of the rtx that is $.
-end
-
-define pi
-print $.fld[0].rtx@7
-end
-
-document pi
-Print the fields of an instruction that is $.
-end
-
-define pbs
-set print_binding_stack ()
-end
-
-document pbs
-In cc1plus, print the current binding stack, frame by frame, up to and
-including the global binding level.
-end
-
-# Put breakpoints at exit and fancy_abort in case abort is mapped
-# to either fprintf/exit or fancy_abort.
-b exit
-b fancy_abort
-
-# Make gdb complain about symbol reading errors. This is so that gcc
-# developers can see and fix bugs in gcc debug output.
-set complaints 20
-
-# Don't let abort actually run, as it will make
-# stdio stop working and therefore the `pr' command above as well.
-# Put this last because gcc does not reference it any more unless
-# USE_SYSTEM_ABORT is defined, so gdb may complain and bail out.
-b abort
+2001-02-16 Gerald Pfeifer <pfeifer@dbai.tuwien.ac.at>
+
+ * .gdbinit: Rename to gdbinit.in.
+ * gdbinit.in: New file,
+ * configure.in: Generate .gdbinit from gdbinit.in.
+ * configure: Regenerated.
+ * Makefile.in (distclean): Always remove .gdbinit.
+
2001-02-16 Jakub Jelinek <jakub@redhat.com>
* objc/objc-act.c (start_class): Register implemented_classes with
-rm -f testsuite/{gcc,g++}.{log,sum}
-rm -f intl/libintl.h libintl.h
-rm -f cxxmain.c splay-tree.c obstack.c alloca.c hashtab.c safe-ctype.c
- -rm -f mklibgcc libgcc.map gccbug configargs.h
+ -rm -f mklibgcc libgcc.map gccbug .gdbinit configargs.h
-rm -f gcov.pod
-rm -f fixinc/Makefile
-rmdir cp f java objc fixinc intl po 2>/dev/null
echo "lang.$t: $x" >> Make-hooks
done
-# If we're not building in srcdir, create .gdbinit.
+# Create .gdbinit.
-if test ! -f Makefile.in; then
- echo "dir ." > .gdbinit
- echo "dir ${srcdir}" >> .gdbinit
- if test x$gdb_needs_out_file_path = xyes
- then
- echo "dir ${srcdir}/config/"`dirname ${out_file}` >> .gdbinit
- fi
- if test "x$subdirs" != x; then
- for s in $subdirs
- do
- echo "dir ${srcdir}/$s" >> .gdbinit
- done
- fi
- echo "source ${srcdir}/.gdbinit" >> .gdbinit
+echo "dir ." > .gdbinit
+echo "dir ${srcdir}" >> .gdbinit
+if test x$gdb_needs_out_file_path = xyes
+then
+ echo "dir ${srcdir}/config/"`dirname ${out_file}` >> .gdbinit
+fi
+if test "x$subdirs" != x; then
+ for s in $subdirs
+ do
+ echo "dir ${srcdir}/$s" >> .gdbinit
+ done
fi
+echo "source ${srcdir}/gdbinit.in" >> .gdbinit
# Define variables host_canonical and build_canonical
# because some Cygnus local changes in the Makefile depend on them.
echo "lang.$t: $x" >> Make-hooks
done
-# If we're not building in srcdir, create .gdbinit.
+# Create .gdbinit.
-if test ! -f Makefile.in; then
- echo "dir ." > .gdbinit
- echo "dir ${srcdir}" >> .gdbinit
- if test x$gdb_needs_out_file_path = xyes
- then
- echo "dir ${srcdir}/config/"`dirname ${out_file}` >> .gdbinit
- fi
- if test "x$subdirs" != x; then
- for s in $subdirs
- do
- echo "dir ${srcdir}/$s" >> .gdbinit
- done
- fi
- echo "source ${srcdir}/.gdbinit" >> .gdbinit
+echo "dir ." > .gdbinit
+echo "dir ${srcdir}" >> .gdbinit
+if test x$gdb_needs_out_file_path = xyes
+then
+ echo "dir ${srcdir}/config/"`dirname ${out_file}` >> .gdbinit
+fi
+if test "x$subdirs" != x; then
+ for s in $subdirs
+ do
+ echo "dir ${srcdir}/$s" >> .gdbinit
+ done
fi
+echo "source ${srcdir}/gdbinit.in" >> .gdbinit
# Define variables host_canonical and build_canonical
# because some Cygnus local changes in the Makefile depend on them.
--- /dev/null
+define pr
+set debug_rtx ($)
+end
+
+document pr
+Print the full structure of the rtx that is $.
+Works only when an inferior is executing.
+end
+
+define prl
+set debug_rtx_list ($, debug_rtx_count)
+end
+
+document prl
+Print the full structure of all rtx insns beginning at $.
+Works only when an inferior is executing.
+Uses variable debug_rtx_count to control number of insns printed:
+ debug_rtx_count > 0: print from $ on.
+ debug_rtx_count < 0: print a window around $.
+
+There is also debug_rtx_find (rtx, uid) that will scan a list for UID and print
+it using debug_rtx_list. Usage example: set $foo=debug_rtx_find(first, 42)
+end
+
+define pt
+set debug_tree ($)
+end
+
+document pt
+Print the full structure of the tree that is $.
+Works only when an inferior is executing.
+end
+
+define ptc
+output (enum tree_code) $.common.code
+echo \n
+end
+
+document ptc
+Print the tree-code of the tree node that is $.
+end
+
+define pdn
+output $.decl.name->identifier.pointer
+echo \n
+end
+
+document pdn
+Print the name of the decl-node that is $.
+end
+
+define ptn
+output $.type.name->decl.name->identifier.pointer
+echo \n
+end
+
+document ptn
+Print the name of the type-node that is $.
+end
+
+define prc
+output (enum rtx_code) $.code
+echo \ (
+output $.mode
+echo )\n
+end
+
+document prc
+Print the rtx-code and machine mode of the rtx that is $.
+end
+
+define pi
+print $.fld[0].rtx@7
+end
+
+document pi
+Print the fields of an instruction that is $.
+end
+
+define pbs
+set print_binding_stack ()
+end
+
+document pbs
+In cc1plus, print the current binding stack, frame by frame, up to and
+including the global binding level.
+end
+
+# Put breakpoints at exit and fancy_abort in case abort is mapped
+# to either fprintf/exit or fancy_abort.
+b exit
+b fancy_abort
+
+# Make gdb complain about symbol reading errors. This is so that gcc
+# developers can see and fix bugs in gcc debug output.
+set complaints 20
+
+# Don't let abort actually run, as it will make
+# stdio stop working and therefore the `pr' command above as well.
+# Put this last because gcc does not reference it any more unless
+# USE_SYSTEM_ABORT is defined, so gdb may complain and bail out.
+b abort
projects / gcc.git / commitdiff