CVS difference for acats/support/repbody.ada

Differences between 1.2 and version 1.3
Log of other versions for file acats/support/repbody.ada

--- acats/support/repbody.ada	1999/03/10 22:05:59	1.2
+++ acats/support/repbody.ada	2000/03/17 01:49:26	1.3
@@ -3,22 +3,22 @@
 --                             Grant of Unlimited Rights
 --
 --     Under contracts F33600-87-D-0337, F33600-84-D-0280, MDA903-79-C-0687,
--- d DCA100-97-D-0025, the U.S. Government obtained 
+--     F08630-91-C-0015, and DCA100-97-D-0025, the U.S. Government obtained
 --     unlimited rights in the software and documentation contained herein.
---  defined in DFAR 252.227-7013(a)(19).  By making 
---  the Government intends to confer upon all 
---  rights  equal to those held by the Government.  
---  rights to use, duplicate, release or disclose the 
--- ata and computer software in whole or in part, in 
--- ny purpose whatsoever, and to have or permit others 
+--     Unlimited rights are defined in DFAR 252.227-7013(a)(19).  By making
+--     this public release, the Government intends to confer upon all
+--     recipients unlimited rights  equal to those held by the Government.
+--     These rights include rights to use, duplicate, release or disclose the
+--     released technical data and computer software in whole or in part, in
+--     any manner and for any purpose whatsoever, and to have or permit others
 --     to do so.
 --
 --                                    DISCLAIMER
 --
 --     ALL MATERIALS OR INFORMATION HEREIN RELEASED, MADE AVAILABLE OR
---   THE GOVERNMENT MAKES NO EXPRESS OR IMPLIED 
+--     DISCLOSED ARE AS IS.  THE GOVERNMENT MAKES NO EXPRESS OR IMPLIED
 --     WARRANTY AS TO ANY MATTER WHATSOEVER, INCLUDING THE CONDITIONS OF THE
--- ION OR OTHER INFORMATION RELEASED, MADE AVAILABLE 
+--     SOFTWARE, DOCUMENTATION OR OTHER INFORMATION RELEASED, MADE AVAILABLE
 --     OR DISCLOSED, OR THE OWNERSHIP, MERCHANTABILITY, OR FITNESS FOR A
 --     PARTICULAR PURPOSE OF SAID MATERIAL.
 --*
@@ -38,22 +38,24 @@
 --                    ADDED TIME-STAMP.
 --      LDC 05/17/90  REMOVED OUTPUT TO DIRECT_IO FILE.
 --      WMC 08/11/92  UPDATED ACVC VERSION STRING TO "9X BASIC".
--- ED ACVC VERSION STRING TO 
+--      DTN 07/05/92  UPDATED ACVC VERSION STRING TO
 --                    "ACVC 2.0 JULY 6 1993 DRAFT".
 --      WMC 01/24/94  MODIFIED LEGAL_FILE_NAME TO ALLOW FIVE POSSIBLE
 --                    FILE NAMES (INCREASED RANGE OF TYPE FILE_NUM TO 1..5).
--- ED ACVC VERSION STRING TO 
+--      WMC 11/06/94  UPDATED ACVC VERSION STRING TO
 --                    "ACVC 2.0 NOVEMBER 6 1994 DRAFT".
--- ED ACVC VERSION STRING TO 
+--      DTN 12/04/94  UPDATED ACVC VERSION STRING TO
 --                    "ACVC 2.0".
 --      KAS 06/19/95  ADDED FUNCTION IDENT_WIDE_CHAR.
 --      KAS 06/19/95  ADDED FUNCTION IDENT_WIDE_STR.
--- ED ACVC VERSION STRING TO 
+--      DTN 11/21/95  UPDATED ACVC VERSION STRING TO
 --                    "ACVC 2.0.1".
--- ED ACVC VERSION STRING TO 
+--      DTN 12/14/95  UPDATED ACVC VERSION STRING TO
 --                    "ACVC 2.1".
--- ED ACVC VERSION STRING TO 
+--      EDS 12/17/97  UPDATED ACVC VERSION STRING TO
 --                    "2.2".
+--      RLB  3/16/00  UPDATED ACATS VERSION STRING TO "2.3".
+--                    CHANGED VARIOUS STRINGS TO READ "ACATS".
 
 WITH TEXT_IO, CALENDAR;
 USE TEXT_IO, CALENDAR;
@@ -61,7 +63,7 @@
 
 PACKAGE BODY REPORT IS
 
-     TYPE STATUS IS (PASS, FAIL, DOES_NOT_APPLY, ACTION_REQUIRED, 
+     TYPE STATUS IS (PASS, FAIL, DOES_NOT_APPLY, ACTION_REQUIRED,
                      UNKNOWN);
 
      TYPE TIME_INTEGER IS RANGE 0 .. 86_400;
@@ -76,8 +78,8 @@
 
 
 
-     ACVC_VERSION : CONSTANT STRING := "2.2";  
-                                       -- VERSION OF ACVC BEING RUN (X.XX).
+     ACATS_VERSION : CONSTANT STRING := "2.3";
+                                       -- VERSION OF ACATS BEING RUN (X.XX).
 
      PROCEDURE PUT_MSG (MSG : STRING) IS
           -- WRITE MESSAGE.  LONG MESSAGES ARE FOLDED (AND INDENTED).
@@ -165,7 +167,7 @@
 
           PUT_MSG ("");
           PUT_MSG (",.,. " & TEST_NAME (1..TEST_NAME_LEN) & " " &
-                   "ACVC " & ACVC_VERSION & " " & TIME_STAMP);
+                   "ACATS " & ACATS_VERSION & " " & TIME_STAMP);
           PUT_MSG ("---- " & TEST_NAME (1..TEST_NAME_LEN) & " " &
                    DESCR & ".");
      END TEST;

Questions? Ask the ACAA Technical Agent