r123544 - in /trunk/gcc/ada: adaint.c g-trasym....

[charlet at gcc dot gnu dot org]

Author: charlet
Date: Fri Apr  6 10:15:36 2007
New Revision: 123544

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=123544
Log:
2007-04-06  Olivier Hainque  <hainque@adacore.com>

	* adaint.c: 
	(convert_addresses): Adjust prototype and dummy definition to expect an
	 extra file_name argument.

	* gmem.c (__gnat_convert_addresses): Wrapper to convert_addresses,
	filling the now expected file_name argument with the appropriate
	argv[0] expansion.
	(__gnat_gmem_a2l_initialize, __gnat_gmem_read_next_frame): Use it.
	(tracebk): Array of void * instead of char *, corresponding to what
	 convert_addresses expects.
	(exename): New static global, to hold the executable file name to be
	used in all convert_addresses invocations.
	(gmem_read_backtrace, __gnat_gmem_symbolic): Account for tracebk type
	change.
	(__gnat_gmem_a2l_initialize): Resolve exename.
	(__gnat_convert_addresses): Use exename as the convert_addresses
	file_name argument.

	* g-trasym.adb (Symbolic_Traceback): Adjust signature of imported
	"convert_addresses", now expecting a filename argument. Import the
	necessary entities to compute the filename to use and pass it to
	convert_addresses.


Modified:
    trunk/gcc/ada/adaint.c
    trunk/gcc/ada/g-trasym.adb
    trunk/gcc/ada/gmem.c