--********************************************************************************************************************
-- Created: 30-Mar-2010 17:01:52 by OpenVMS SDL EV3-3      
-- Source:  04-MAR-1996 16:35:59 $1$DGA7274:[STARLET_ADA.LIS]LIBWAITDEF.SDL;1 
--********************************************************************************************************************
with SYSTEM; use SYSTEM;
with STARLET; use STARLET;
with CONDITION_HANDLING; use CONDITION_HANDLING;
 
package LIBWAITDEF is
 
--  module $LIBWAITDEF
 
-- Interface definitions for LIB$WAIT
--
-- LIB$WAIT floating-point format codes (must equal CVT$K_VAX_F,... codes)
 
    LIB_K_VAX_F			: constant := 0;			--  VAX F     Floating point data
    LIB_K_VAX_D			: constant := 1;			--  VAX D     Floating point data
    LIB_K_VAX_G			: constant := 2;			--  VAX G     Floating point data
    LIB_K_VAX_H			: constant := 3;			--  VAX H     Floating point data
    LIB_K_IEEE_S		: constant := 4;			--  IEEE S    Floating point data
    LIB_K_IEEE_T		: constant := 5;			--  IEEE T    Floating point data
 
-- LIB$WAIT option definitions
 
    LIB_K_WAKE			: constant := 0;			--  WAKE option, interruptable
    LIB_K_NOWAKE		: constant := 1;			--  NOWAKE option, non-interruptable
 
end LIBWAITDEF;