From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.5-pre1 (2020-06-20) on
	ip-172-31-74-118.ec2.internal
X-Spam-Level: 
X-Spam-Status: No, score=0.8 required=3.0 tests=BAYES_50 autolearn=ham
	autolearn_force=no version=3.4.5-pre1
Date: 11 Nov 91 21:58:07 GMT
From: elroy.jpl.nasa.gov!swrinde!cs.utexas.edu!csc.ti.com!tilde.csc.ti.com!skit
zo.dseg.ti.com!skvax1.dseg.ti.com!anderson@ames.arc.nasa.gov
Subject: Looking for Ada tool.
Message-ID: <1991Nov11.165808.84@skvax1.dseg.ti.com>
List-Id: <comp.lang.ada>

I am posting this for a friend.  Please reply directly to:


 Tom Creed
 creed@lvis.dseg.ti.com    -- internet


Thanks

John Anderson

--  -----------------------------------------------------------                
                     
In conjunction with automating some source maintenance procedures, I have the
following need :

   Given an ADA identifier, locate the statements within multiple source files
   where the identifier is used. Ultimately determine what ADA object(s)
   is(are) declared using the given identifier.

For example (this is contrived of course) :

  given :

    HIGH : constant positive := 10 ; -- an identifier of interest.

    -- source statements to be examined for occurrances of the identifier.

    LOW : constant positive := 1 ; 

    type PROCESS_RECORD ( MAX : positive ) is
     record
      CAPCITY : integer  := 0   ;
      SPEED   : positive := MAX ;
     end record ;

    type PROCESS_ARRAY is array ( positive ) of PROCESS_RECORD ;
   
  find statements like the following :

    PROCESS   : PROCESS_RECORD ( HIGH ) ;
    PROCESSES : PROCESS_ARRAY ( 0 .. 3 ) :=
      ( 0 => ( 0 , LOW  ) ,
        1 => ( 1 , HIGH ) ,
        2 => ( 2 , LOW  ) 
      ) ;

  and determine that the objects declared with the identifier "HIGH" are 
  "PROCESS" and "PROCESSES".


It is easy enough to locate the statements where the identifier occurs by
employing a VMS search command or equivalent. It is rather difficult - using
simple VMS DCL commands or equivalents - to identify the actual objects in a
wide range of ADA statement syntaxs.

If anyone is aware of a public domain (or otherwise easily accessable) utility
that can do some of all of the above, please reply to :

 Tom Creed
 LVIPL::CREED              -- VAX mail
 creed@lvis.dseg.ti.com    -- internet

Thanks.