/***
*fltintrn.h - contains declarations of internal floating point types,
* routines and variables
*
* Copyright (c) 1985-2001, Microsoft Corporation. All rights reserved.
*
*Purpose:
* Declares floating point types, routines and variables used
* internally by the C run-time.
*
* [Internal]
*
*Revision History:
* 10-20-88 JCR Changed 'DOUBLE' to 'double' for 386
* 08-15-89 GJF Fixed copyright, indents
* 10-30-89 GJF Fixed copyright (again)
* 03-02-90 GJF Added #ifndef _INC_STRUCT stuff. Also, cleaned up
* the formatting a bit.
* 03-05-90 GJF Fixed up the arg types in protoypes. Also, added
* #include <cruntime.h>
* 03-22-90 GJF Made _fltin(), _fltin2(), _fltout() and _fltout2()
* _CALLTYPE2 (for now) and added a prototype for
* _fptostr().
* 08-01-90 SBM Moved _cftoe() and _cftof() here from internal.h
* and _cfltcvt_tab from input.c and output.c,
* added typedefs for _cfltcvt_tab entries,
* renamed module from <struct.h> to <fltintrn.h> and
* adjusted #ifndef stuff to #ifndef _INC_FLTINTRN
* 08-29-90 SBM Changed type of _cfltcvt_tab[] to agree with
* definition in cmiscdat.c
* 04-26-91 SRW Removed level 3 warnings
* 08-26-91 JCR Changed MIPS to _MIPS_, ANSI naming
* 08-06-92 GJF Function calling type and variable type macros. Revised
* use of target processor macros.
* 11-09-92 GJF Fixed preprocessing conditionals for MIPS.
* 01-09-93 SRW Remove usage of MIPS and ALPHA to conform to ANSI
* Use _MIPS_ and _ALPHA_ instead.
* 01-21-93 GJF Removed support for C6-386's _cdecl.
* 04-06-93 SKS Replace _CRTAPI1/2 with __cdecl, _CRTVAR1 with nothing
* 09-01-93 GJF Merged Cuda and NT SDK versions.
* 10-13-93 GJF Dropped _MIPS_. Replaced _ALPHA_ with _M_ALPHA.
* 10-29-93 GJF Disabled the ever-annoying 4069 warning.
* 10-02-94 BWT Add PPC support.
* 12-15-94 XY merged with mac header
* 02-14-95 CFW Clean up Mac merge.
* 03-29-95 CFW Add error message to internal headers.
* 12-14-95 JWM Add "#pragma once".
* 02-05-97 GJF Deleted obsolete support for _CRTAPI* and _NTSDK.
* Replaced (defined(_M_MPPC) || defined(_M_M68K)) with
* defined(_MAC) where appropriate. Replaced _CALLTYPE2
* with __cdecl. Also, detab-ed.
* 05-17-99 PML Remove all Macintosh support.
* 09-05-00 GB Changed the defination of fltout functions. Use DOUBLE
* instead of double
*
****/
#if _MSC_VER > 1000 /*IFSTRIP=IGN*/
#pragma once
#endif
#ifndef _INC_FLTINTRN
#define _INC_FLTINTRN
#ifndef _CRTBLD
/*
* This is an internal C runtime header file. It is used when building
* the C runtimes only. It is not to be used as a public header file.
*/
#error ERROR: Use of C runtime library internal header file.
#endif /* _CRTBLD */
#ifdef __cplusplus
extern "C" {
#endif
#include <cruntime.h>
/* Define _CRTIMP */
#ifndef _CRTIMP
#ifdef CRTDLL
#define _CRTIMP __declspec(dllexport)
#else /* ndef CRTDLL */
#ifdef _DLL
#define _CRTIMP __declspec(dllimport)
#else /* ndef _DLL */
#define _CRTIMP
#endif /* _DLL */
#endif /* CRTDLL */
#endif /* _CRTIMP */
/* Define __cdecl for non-Microsoft compilers */
#if ( !defined(_MSC_VER) && !defined(__cdecl) )
#define __cdecl
#endif
/*
* For MS C for the x86 family, disable the annoying "long double is the
* same precision as double" warning
*/
#ifdef _M_IX86
#pragma warning(disable:4069)
#endif
/*
* structs used to fool the compiler into not generating floating point
* instructions when copying and pushing [long] double values
*/
#ifndef DOUBLE
typedef struct {
double x;
} DOUBLE;
#endif
#ifndef LONGDOUBLE
typedef struct {
#if defined(_M_MRX000) || defined(_M_ALPHA) || defined(_M_PPC)
/*
* No long double type for MIPS, ALPHA, PPC.
*/
double x;
#else
/*
* Assume there is a long double type
*/
long double x;
#endif
} LONGDOUBLE;
#endif
/*
* typedef for _fltout
*/
typedef struct _strflt
{
int sign; /* zero if positive otherwise negative */
int decpt; /* exponent of floating point number */
int flag; /* zero if okay otherwise IEEE overflow */
char *mantissa; /* pointer to mantissa in string form */
}
*STRFLT;
/*
* typedef for _fltin
*/
typedef struct _flt
{
int flags;
int nbytes; /* number of characters read */
long lval;
double dval; /* the returned floating point number */
}
*FLT;
/* floating point conversion routines, keep in sync with mrt32\include\convert.h */
char *_cftoe(double *, char *, int, int);
char *_cftof(double *, char *, int);
void __cdecl _fptostr(char *, int, STRFLT);
#ifdef _MT
STRFLT __cdecl _fltout2( DOUBLE, STRFLT, char * );
FLT __cdecl _fltin2( FLT , const char *, int, int, int );
#else
STRFLT __cdecl _fltout( DOUBLE );
FLT __cdecl _fltin( const char *, int, int, int );
#endif
/*
* table of pointers to floating point helper routines
*
* We can't specify the prototypes for the entries of the table accurately,
* since different functions in the table have different arglists.
* So we declare the functions to take and return void (which is the
* correct prototype for _fptrap(), which is what the entries are all
* initialized to if no floating point is loaded) and cast appropriately
* on every usage.
*/
typedef void (* PFV)(void);
extern PFV _cfltcvt_tab[6];
typedef void (* PF0)(DOUBLE*, char*, int, int, int);
#define _cfltcvt(a,b,c,d,e) (*((PF0)_cfltcvt_tab[0]))(a,b,c,d,e)
typedef void (* PF1)(char*);
#define _cropzeros(a) (*((PF1)_cfltcvt_tab[1]))(a)
typedef void (* PF2)(int, char*, char*);
#define _fassign(a,b,c) (*((PF2)_cfltcvt_tab[2]))(a,b,c)
typedef void (* PF3)(char*);
#define _forcdecpt(a) (*((PF3)_cfltcvt_tab[3]))(a)
typedef int (* PF4)(DOUBLE*);
#define _positive(a) (*((PF4)_cfltcvt_tab[4]))(a)
typedef void (* PF5)(LONGDOUBLE*, char*, int, int, int);
#define _cldcvt(a,b,c,d,e) (*((PF5)_cfltcvt_tab[5]))(a,b,c,d,e)
#ifdef _M_IX86
#pragma warning(default:4069)
#endif
#ifdef __cplusplus
}
#endif
#endif /* _INC_FLTINTRN */