home *** CD-ROM | disk | FTP | other *** search
/ Programmer's ROM - The Computer Language Library / programmersrom.iso / ada / metric / perform.abs < prev    next >
Encoding:
Text File  |  1988-05-03  |  1.7 KB  |  35 lines
  1. package ADA_PERFORMANCE_ANALYZER is -- a tool providing performance info     
  2. -- This tool will provide testing and timing 
  3. -- information.  It will give quantitative
  4. -- information on how much execution time
  5. -- is spent in various modules in a system.
  6.  
  7.    procedure ANALYZE_PERFORMANCE(SOURCE_FILE       : in Ada_SOURCE_FILE_TYPE;
  8.                                  DESTINATION_FILE  : out REPORT_FILE_TYPE);
  9.    -- is the tool providing performance information
  10.  
  11.    package TITLE_PAGE is new TITLE_PAGE_PACKAGE
  12.        (DEVELOPING_ORGANIZATION    => "Intermetrics, Inc.",
  13.         AUTHOR                     => "Kathy Velick",
  14.         CONTACT                    => "Ron Rathgeber",
  15.         ADDRESS                    => ("5392 Bolsa Avenue",
  16.                                        "Huntington Beach",
  17.                                        "CA","92649"),
  18.         PHONE                      => (714,891,4631),
  19.         DATE_SUBMITTED             => (20,NOV,1984));
  20.  
  21.    package TECHNICAL_PARAMETERS is new TECHNICAL_PARAMETERS_PACKAGE
  22.        (LINES_OF_SOURCE_CODE         => TBD,
  23.         DEVELOPMENT_COMPILER         => (IBM3083,AIE_UTS),
  24.         PLANNED_COMPILERS_SUPPORTED  => ((DECVAX,DECADA),
  25.                                          (DECVAX,TSIADA)),
  26.         AUXILIARY_FILES_SIZE         => (TBD);  
  27.  
  28.    package DEVELOPMENT_SCHEDULE_AND_STATUS is new SCHEDULE_PACKAGE
  29.        (COMPLETED_EVENTS            => NULL;
  30.         SCHEDULED_EVENTS            => ((PDR,(13,JAN,1985)),
  31.                                         (CDR,(13,MAR,1985)),
  32.                                         (FIRST_BUILT,(13,FEB,1985)),
  33.                                         (DELIVERY,(13,JUL,1985)));
  34. end ADA_PERFORMANCE_ANALYZER;
  35.