> > 	* ada-lang.c (find_old_style_renaming_symbol): Change
> > 	function_name to const and use strncpy to stript the
> > 	suffix.

I think there was a mistake in the last part of the patch and you would
have ended up overwriting the function name with the __<var-name>___XR
portion.

I was almost done with my own version of the change, so I finished it,
tested it, and checked it in.

While working on this, I also added handling for various suffixes
that get introduced for nested/static procedures as well as special
routines (Protected Objects).

-- 
Joel