CVS difference for acats/cxa/cxaa010.a
--- acats/cxa/cxaa010.a 1998/09/26 01:07:15 1.1
+++ acats/cxa/cxaa010.a 1999/03/10 23:27:34 1.2
@@ -2,15 +2,16 @@
--
-- Grant of Unlimited Rights
--
--- 00-87-D-0337, F33600-84-D-0280, MDA903-79-C-0687 and
--- e U.S. Government obtained unlimited rights in the
--- tation contained herein. Unlimited rights are
--- 227-7013(a)(19). By making this public release,
--- ds to confer upon all recipients unlimited rights
--- by the Government. These rights include rights to
--- ase or disclose the released technical data and
--- whole or in part, in any manner and for any purpose
--- ave or permit others to do so.
+-- Under contracts F33600-87-D-0337, F33600-84-D-0280, MDA903-79-C-0687,
+-- F08630-91-C-0015, and DCA100-97-D-0025, the U.S. Government obtained
+-- unlimited rights in the software and documentation contained herein.
+-- 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
--
@@ -49,7 +50,17 @@
-- APPLICABILITY CRITERIA:
-- Applicable to all implementations capable of supporting external
-- Text_IO files and Decimal Fixed Point Types
+--
+-- All implementations must attempt to compile this test.
--
+-- For implementations validating against Information Systems Annex (F):
+-- this test must execute and report PASSED.
+--
+-- For implementations not validating against Annex F:
+-- this test may report compile time errors at one or more points
+-- indicated by "-- ANX-F RQMT", in which case it may be graded as inapplicable.
+-- Otherwise, the test must execute and report PASSED.
+--
--
-- CHANGE HISTORY:
-- 06 Dec 94 SAIC ACVC 2.0
@@ -58,6 +69,7 @@
-- Text_IO operations.
-- 14 Nov 95 SAIC Corrected string indexing for ACVC 2.0.1.
-- 27 Feb 97 PWB.CTA Allowed for non-support of some IO operations
+-- 16 FEB 98 EDS Modified documentation.
--!
with Ada.Text_IO;
@@ -106,8 +118,8 @@
Total_String_Length : constant := 20;
Spacer : constant String := " "; -- Two blanks.
- type Price_Type is delta 0.1 digits 4; -- N/A => ERROR
- type Value_Type is delta 0.01 digits 5;
+ type Price_Type is delta 0.1 digits 4; -- ANX-F RQMT
+ type Value_Type is delta 0.01 digits 5; -- ANX-F RQMT
type Property_Type is
record
Questions? Ask the ACAA Technical Agent