--******************************************************************************************************************** -- Created: 9-Mar-2021 22:28:18 by OpenVMS SDL EV3-3 -- Source: 10-APR-1992 12:20:32 $1$DGA8085:[LIB_ADA.LIS]CLONEVADEF.SDL;1 --******************************************************************************************************************** with SYSTEM; use SYSTEM; with STARLET; use STARLET; with CONDITION_HANDLING; use CONDITION_HANDLING; package CLONEVADEF is -- module $CLONEVADEF --+ -- Copy characteristic definitions --- CLONEVA_C_COPY : constant := 0; -- Copy CLONEVA_C_NOCOPY : constant := 1; -- No copy CLONEVA_C_DZRO : constant := 2; -- Demand zero CLONEVA_C_CW : constant := 3; -- Copy on write CLONEVA_C_MAX_CHAR : constant := 3; -- Maximum value end CLONEVADEF;