Path: utzoo!utgpu!watmath!clyde!att!osu-cis!tut.cis.ohio-state.edu!bloom-beacon!gatech!gitpyr!tynor
From: tynor@pyr.gatech.EDU (Steve Tynor)
Newsgroups: comp.lang.ada
Subject: Re: Ada language revision
Keywords: exceptions
Message-ID: <6793@pyr.gatech.EDU>
Date: 18 Nov 88 16:39:47 GMT
References: <44449@beno.seismo.CSS.GOV> <3563@hubcap.UUCP> <733@marvin.cme-durer.ARPA>
Reply-To: tynor@pyr.UUCP (Steve Tynor)
Organization: Georgia Institute of Technology
Lines: 24

In article <733@marvin.cme-durer.ARPA> leake@cme-durer.ARPA (Stephe Leake) writes:
>What's wrong with a small if statement? Personally, I would like to
>have an EXCEPTION_IO that would let me print the name of an exception.

Here, here, etc.  I once worked with the Telesoft (?) compiler on an Eclipse
that had a package allowing you to find out what the current exception was.
It helped out immensely during debugging:

    ...
    exception
       when others =>
	   text_io.put_line ("Opps! exception " & CURRENT_EXCEPTION'IMAGE &
			      " in procedure XXX.");
	   raise;
    end XXX;

Unfortunately, I now use VAX Ada and Alsys, so I can't do this.  

=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Progress means replacing something wrong with something more subtly wrong.
                     
    Steve Tynor
    Georgia Tech Research Institute
    tynor@gitpyr.gatech.edu