/********************************************************************************************************************************/ /* Created: 30-Mar-2010 17:29:25 by OpenVMS SDL EV3-3 */ /* Source: 30-MAR-2010 17:29:18 $1$DGA7274:[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 */