home *** CD-ROM | disk | FTP | other *** search
/ Programmer's ROM - The Computer Language Library / programmersrom.iso / ada / debug / sd.abs next >
Encoding:
Text File  |  1988-05-03  |  1.8 KB  |  38 lines
  1. package SYMBOLIC_DEBUGGER is
  2. -- This is an interactive debugging tool that provides debugging and
  3. -- diagnostic aids at the Ada statement level. 
  4.  
  5.    type debug_instructions is -- format to be determined
  6.       -- a set of initial instructions for the debugger.
  7.  
  8.    procedure debug (source_file : in Ada_SOURCE_FILE_TYPE;
  9.                     report_file : out REPORT_FILE_TYPE:=STANDARD_OUTPUT; 
  10.                     command_file: in FILE_TYPE := STANDARD_INPUT);
  11.    -- is the procedure to invoke the debugger.  
  12.  
  13.    package TITLE_PAGE is new TITLE_PAGE_PACKAGE
  14.        (DEVELOPING_ORGANIZATION      => "Intermetrics, Inc.",
  15.         AUTHOR                       => "Kathy Velick",
  16.         CONTACT                      => "Ron Rathgeber",
  17.         ADDRESS                      => ("5392 Bolsa Avenue",
  18.                                          "Huntington Beach",
  19.                                          "CA","92649"),
  20.         PHONE                        => (714,891,4631),
  21.         DATE_SUBMITTED               => (20,NOV,1984));
  22.  
  23.    package TECHNICAL_PARAMETERS is new TECHNICAL_PARAMETERS_PACKAGE
  24.        (LINES_OF_SOURCE_CODE         => TBD,
  25.         DEVELOPMENT_COMPILER         => (IBM3083,AIE_UTS),
  26.         PLANNED_COMPILERS_SUPPORTED  => ((DECVAX,DECADA),
  27.                                          (DECVAX,TSIADA)),
  28.         AUXILIARY_FILES_SIZE         => (TBD);
  29.  
  30.    package DEVELOPMENT_SCHEDULE_AND_STATUS is new SCHEDULE_PACKAGE
  31.        (COMPLETED_EVENTS            => NULL;
  32.         SCHEDULED_EVENTS            => ((PDR,(13,JAN,1985)),
  33.                                         (CDR,(13,MAR,1985)),
  34.                                         (FIRST_BUILT,(13,FEB,1985)),
  35.                                         (DELIVERY,(13,JAN,1986)));
  36.  
  37. end SYMBOLIC_DEBUGGER;
  38.