From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=0.4 required=5.0 tests=BAYES_00,INVALID_DATE, UNRESOLVED_TEMPLATE autolearn=no autolearn_force=no version=3.4.4 Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!utgpu!water!watmath!clyde!cbatt!ihnp4!ucbvax!slb-test.CSNET"!"PSI%SNMSN1::PSI%DSAVX1::WILLY From: "PSI%SNMSN1::PSI%DSAVX1::WILLY@slb-test.CSNET".UUCP Newsgroups: comp.lang.ada Subject: Retrieving Ada exception names under VAX/VMS Message-ID: <8705112334.AA20220@ucbvax.Berkeley.EDU> Date: Mon, 11-May-87 12:58:00 EDT Article-I.D.: ucbvax.8705112334.AA20220 Posted: Mon May 11 12:58:00 1987 Date-Received: Thu, 14-May-87 00:49:54 EDT Sender: daemon@ucbvax.BERKELEY.EDU Distribution: world Organization: The ARPA Internet List-Id: The following message was sent to me by Herve BITTEUR who asked me to forward it to INFO-ADA. Please send any direct replies to me and I'll pass them to Herve. Regards, C. Scott Willy Dowell Schlumberger B.P. 90 42103 St-Etienne France 77.32.64.23 WILLY%M_DSAVX1%SLB-DOLL.CSNET@RELAY.CS.NET -------------------------------cut here------------------------------------- I guess somebody has already developed the tool I need to implement a general 'error_handler' in an Ada application. This application is a real-time one, it uses about 40 Ada tasks. I would like to know, when a task dies for a non-handled exception, at least the NAME of this exception. Compared with a sequential program which, before dying, tells you the name of the exception, a program made of several tasks does not die, only the task dies. So I would like to be able to program this kind of code in the body of each task : ... exception when others => TEXT_IO.PUT_LINE(CURRENT_EXCEPTION.NAME); This uses a package CURRENT_EXCEPTION which exports, via NAME routine, the name of the current exception. This is derived from a Data General environ- ment, but I am sure that someone has developed something analogous for a VAX/VMS or VAX/ELN environment, with the DEC Ada compiler. I hope this person will read this message, and thank him in advance. Herve BITTEUR