--******************************************************************************************************************** -- Created: 30-Mar-2010 17:01:48 by OpenVMS SDL EV3-3 -- Source: 17-FEB-2000 16:31:50 $1$DGA7274:[STARLET_ADA.LIS]EFNDEF.SDL;1 --******************************************************************************************************************** with SYSTEM; use SYSTEM; with STARLET; use STARLET; with CONDITION_HANDLING; use CONDITION_HANDLING; package EFNDEF is -- module $EFNDEF EFN_C_ENF : constant := 128; -- Event No Flag (no stored state) EFN_C_CTX : constant := 129; -- Wait for context end EFNDEF;