strtopx.c File Reference

#include "gdtoaimp.h"

Include dependency graph for strtopx.c:

Go to the source code of this file.

Functions
int	strtopx (CONST char *s, char **sp, void *V)

Function Documentation

strtopx()

int strtopx	(	CONST char *	s,
		char **	sp,
		void *	V
	)

Definition at line 60 of file strtopx.c.

{
    static FPI fpi = {64, 1 - 16383 - 64 + 1, 32766 - 16383 - 64 + 1, 1, SI};
    ULong bits[2];
    Long exp;
    int k;
    UShort* L = (UShort*)V;

    k = strtodg(s, sp, &fpi, &exp, bits);
    switch(k & STRTOG_Retmask)
    {
        case STRTOG_NoNumber:
        case STRTOG_Zero:
            L[0] = L[1] = L[2] = L[3] = L[4] = 0;
            break;

        case STRTOG_Denormal:
            L[_0] = 0;
            goto normal_bits;

        case STRTOG_Normal:
        case STRTOG_NaNbits:
            L[_0] = (UShort)(exp + 0x3fff + 63);
        normal_bits:
            L[_4] = (UShort)bits[0];
            L[_3] = (UShort)(bits[0] >> 16);
            L[_2] = (UShort)bits[1];
            L[_1] = (UShort)(bits[1] >> 16);
            break;

        case STRTOG_Infinite:
            L[_0] = 0x7fff;
            L[_1] = L[_2] = L[_3] = L[_4] = 0;
            break;

        case STRTOG_NaN:
            L[0] = ldus_QNAN0;
            L[1] = ldus_QNAN1;
            L[2] = ldus_QNAN2;
            L[3] = ldus_QNAN3;
            L[4] = ldus_QNAN4;
    }
    if(k & STRTOG_Neg)
    {
        {
            L[_0] |= 0x8000;
        }
    }
    return k;
}

References Long, SI, strtodg(), STRTOG_Denormal, STRTOG_Infinite, STRTOG_NaN, STRTOG_NaNbits, STRTOG_Neg, STRTOG_NoNumber, STRTOG_Normal, STRTOG_Retmask, and STRTOG_Zero.