/********************************************************************************************************************************/
/* Created:  9-Mar-2021 22:28:02 by OpenVMS SDL EV3-3      */
/* Source:  09-MAR-2021 22:28:00 $1$DGA8085:[STARLET_H.SRC]CVT$ROUTINES.SDI;1 */
/********************************************************************************************************************************/
/*** MODULE cvt$routines ***/
#ifndef __CVT_ROUTINES_LOADED
#define __CVT_ROUTINES_LOADED 1
 
#pragma __nostandard			 /* This file uses non-ANSI-Standard features */
#pragma __member_alignment __save
#pragma __nomember_alignment
#ifdef __INITIAL_POINTER_SIZE			 /* Defined whenever ptr size pragmas supported */
#pragma __required_pointer_size __save		 /* Save the previously-defined required ptr size */
#pragma __required_pointer_size __short		 /* And set ptr size default to 32-bit pointers */
#endif
 
#ifdef __cplusplus
    extern "C" {
#define __unknown_params ...
#define __optional_params ...
#else
#define __unknown_params
#define __optional_params ...
#endif
 
#ifndef __struct
#if !defined(__VAXC)
#define __struct struct
#else
#define __struct variant_struct
#endif
#endif
 
#ifndef __union
#if !defined(__VAXC)
#define __union union
#else
#define __union variant_union
#endif
#endif
 
/*************************************************************************** */
/*                                                                           */
/*  Copyright (c) 1993,1994                                                  */
/*  by DIGITAL Equipment Corporation, Maynard, Mass.                         */
/*                                                                           */
/*  This software is furnished under a license and may be used and  copied   */
/*  only  in  accordance  with  the  terms  of  such  license and with the   */
/*  inclusion of the above copyright notice.  This software or  any  other   */
/*  copies  thereof may not be provided or otherwise made available to any   */
/*  other person.  No title to and ownership of  the  software  is  hereby   */
/*  transferred.                                                             */
/*                                                                           */
/*  The information in this software is subject to change  without  notice   */
/*  and  should  not  be  construed  as  a commitment by DIGITAL Equipment   */
/*  Corporation.                                                             */
/*                                                                           */
/*  DIGITAL assumes no responsibility for the use or  reliability  of  its   */
/*  software on equipment which is not supplied by DIGITAL.                  */
/*                                                                           */
/*************************************************************************** */
/*    CVT$CONVERT_FLOAT                                                     */
/*                                                                          */
/*    Convert floating point data types.                                    */
/*                                                                          */
/*    The CVT$CONVERT_FLOAT converts floating point data types to other     */
/*    supported floating point data types.                                  */
/*                                                                          */
#define  cvt$convert_float  CVT$CONVERT_FLOAT
	
#ifdef __NEW_STARLET
unsigned int cvt$convert_float(
	unsigned int *input_value,
	unsigned int input_type_code,
	unsigned int *output_value,
	unsigned int output_type_code,
	unsigned int options);
#else	/* __OLD_STARLET */
unsigned int cvt$convert_float(__unknown_params);
#endif	/* #ifdef __NEW_STARLET */
#define  cvt$ftof  CVT$FTOF
	
#ifdef __NEW_STARLET
int cvt$ftof(
	unsigned int *input_value,
	int input_type_code,
	unsigned int *output_value,
	int output_type_code,
	int options);
#else	/* __OLD_STARLET */
int cvt$ftof(__unknown_params);
#endif	/* #ifdef __NEW_STARLET */
 
#pragma __member_alignment __restore
#ifdef __INITIAL_POINTER_SIZE			 /* Defined whenever ptr size pragmas supported */
#pragma __required_pointer_size __restore		 /* Restore the previously-defined required ptr size */
#endif
#ifdef __cplusplus
    }
#endif
#pragma __standard
 
#endif /* __CVT_ROUTINES_LOADED */