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.1 required=5.0 tests=BAYES_05,INVALID_MSGID autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,d6413a22d4aaecda X-Google-Attributes: gid103376,public From: jakrzy@ss2.magec.com (James A. Krzyzanowski) Subject: Re: Program identification Date: 1996/09/13 Message-ID: #1/1 X-Deja-AN: 180438456 sender: usenet@most.fw.hac.com x-nntp-posting-host: ss2 references: organization: Magnavox Electronics Systems Company newsgroups: comp.lang.ada Date: 1996-09-13T00:00:00+00:00 List-Id: Chris Sparks (sparks@AISF.COM) wrote: : Does anyone know of a way to determine the program name within a program : without explictly making a constant for it. If there isn't a way then : maybe a new attribute should be made for the next version of Ada, namely: : P'Identity which returns a string, P is a program unit : I am using this information as part of an exception reporter system. : BTW these would be helpful too: : P'Location which returns a string, P is a program unit and the string would : contain the current line number in the source code, or maybe even the : previous line number (for exception processing). : Any thoughts? Using Alsys Ada on an HP/UX platform, it would be... System_Environment.Arg_Value (Index => 0); -- Not necessarily the opinion of the company... -- --------------------------------------------------------------------------- James A. Krzyzanowski - Senior Software Engineer - AFATDS Hughes Defense Communications * Fort Wayne, IN 46808 * (219) 429-6446 ^^^ the company formerly known as Magnavox Electronic Systems Company Internet: jakrzy@most.fw.hac.com * AOL: JimShiz@AOL.com * MOST: jakrzy@most "I'd rather be right than politically correct !!!" - Rush is Right ---------------------------------------------------------------------------