Re: Exception traceback when using TDM-GCC 5.1.0-3

[ahlan.marriott@gmail.com]

On Friday, 29 July 2016 20:48:54 UTC+2, Anh Vo  wrote:
> On Friday, July 29, 2016 at 8:57:44 AM UTC-7, Anh Vo wrote:
> > On Thursday, July 28, 2016 at 1:34:12 PM UTC-7, ahlan.m...@gmail.com wrote:
> > > On Thursday, 28 July 2016 18:16:14 UTC+2, Anh Vo  wrote:
> > > > On Thursday, July 28, 2016 at 9:00:16 AM UTC-7, ahlan.m...@gmail.com wrote:
> > > > > On Thursday, 28 July 2016 17:44:32 UTC+2, Anh Vo  wrote:
> > > > > > On Thursday, July 28, 2016 at 7:48:17 AM UTC-7, Anh Vo wrote:
> > > > > > > On Wednesday, July 27, 2016 at 11:07:02 PM UTC-7, ahlan.m...@gmail.com wrote:
> > > > > > > > >  
> > > > > > > > > The exception is captured captured and handled in the exception handler. In addition, the traceback information is extracted as shown below.
> > > > > > > > > 
> > > > > > > > > --...
> > > > > > > > > exception 
> > > > > > > > >    when Error : others =>      
> > > > > > > > >      Put_Line (GNAT.Traceback.Symbolic.Symbolic_Traceback(Error));
> > > > > > > > > --...
> > > > > > > > 
> > > > > > > > Dear Anh,
> > > > > > > > 
> > > > > > > > Yes this is how I catch exceptions and display them symbolically.
> > > > > > > > My current problem is that although I get some kind of traceback, it isn't complete.
> > > > > > > > I only get two of the expected eight traceback addresses.
> > > > > > > > The two I do get have very high addresses and it seems normal that these
> > > > > > > > cannot be resolved symbolically - hence they are displayed as "??" by both
> > > > > > > > Gnat.Traceback.Symbolic.Symbolic_Traceback and addr2line
> > > > > > > 
> > > > > > > Try Simon's code with my modification shown below to see what I get complete traceback. By the way, it work on my PC.
> > > > > > > 
> > > > > > > with Ada.Exceptions;  use Ada.Exceptions;
> > > > > > > with Ada.Text_Io; use Ada.Text_Io;
> > > > > > > with GNAT.Traceback.Symbolic;
> > > > > > > procedure CE is
> > > > > > >    procedure Raiser (N : Positive) is
> > > > > > >    begin
> > > > > > >       Raiser (N - 1);
> > > > > > >    end Raiser;
> > > > > > > begin
> > > > > > >    Raiser (5);
> > > > > > > exception
> > > > > > >    when Error : others =>
> > > > > > >       Put_Line ("Houston we have a problem: " & Exception_Information(Error));
> > > > > > >       Put_Line (GNAT.Traceback.Symbolic.Symbolic_Traceback(Error));
> > > > > > > end Ce; 
> > > > > > > 
> > > > > > > AV
> > > > > > 
> > > > > > Sorry, what I meant was "Try Simon's code with my modification shown below to see if you get complete traceback. By the way, it worked on my PC."
> > > > > 
> > > > > Dear Anh,
> > > > > 
> > > > > Yes I appreciate that..
> > > > > This is what I always try to do - and it works with GPL but not with TDM.
> > > > > But then nor does Addr2line so something is not quite right.
> > > >  
> > > > I share your frustration since I was in a similar situation before. Thus, I have a suggestion. Use a PC having no GNAT nor TDM-GCC installed before. Install TDM-GCC and try it one more time. By the way, use command line "gnatmake -f -g ce.adb -bargs -E" first. If you do not have another PC, uninstall GNAT-GPL and TDM-GCC completely before reinstall TDM-GCC.
> > > > 
> > > > Anh Vo
> > > 
> > > Dear Anh,
> > > Although it made no real sense, I did as you suggested and much to my surprise I now get a traceback when I use gnatmake that when fed to Addr2line returns the traceback that Simon has. 
> > > i.e. Address within CE.adb
> > > At least this is useful.
> > > However trying to convert this into a symbolic traceback using GNAT.Traceback.Symbolic.Symbolic_Traceback(Error)
> > > merely produces eight lines of output - each line with the hexadecimal traceback address.
> > > i.e. GNAT.Traceback.Symbolic.Symbolic_Traceback isn't working.
> > > Does it work for you?
> > 
> > Yes, it does work as expected. Here are the results I got.
> > 
> > Houston we have a problem: Exception name: CONSTRAINT_ERROR
> > Message: ce.adb:7 range check failed
> > Call stack traceback locations:
> > 0x40198b 0x40199b 0x40199b 0x40199b 0x40199b 0x4019bb 0x40194f 0x4013db 0x75883388 0x77949900 0x779498d3
> > 
> > [C:\Ada\Test\ce.exe]
> > 0x0040198B ce.raiser at ce.adb:7
> > 0x0040199B ce.raiser at ce.adb:7
> > 0x0040199B ce.raiser at ce.adb:7
> > 0x0040199B ce.raiser at ce.adb:7
> > 0x0040199B ce.raiser at ce.adb:7
> > 0x004019BB ce at ce.adb:10
> > 0x0040194F main at b~ce.adb:221
> > 0x004013DB .tmainCRTStartup at crtexe.c:332
> > 
> > [C:\Windows\syswow64\kernel32.dll]
> > [C:\Windows\SysWOW64\ntdll.dll]
>  
> MIG,
> 
> My apology for crewing up. The gnatmake I invoked was part of GNAT-GPL. After correcting it on my PC at home, I got same results that you did, 9 Hex addresses without traceback location.
> 
> Anh Vo

Well at least my problem is reproducible by others.
I wonder what we are doing wrong?

MfG
Ahlan