Function checkvaltype2

src/debug.cpp:981–1098

}

static int checkvaltype2(TCHAR **c, uae_u32 *val, debugfloatx80 *valx80, TCHAR def)
{
	TCHAR nc;

	ignore_ws(c);

#ifdef WITH_SOFTFLOAT
	// check for floating point formats
	TCHAR *cp = *c;
	for (;;) {
		nc = *cp++;
		TCHAR nc2 = _totupper (*cp);
		if (!nc || _istspace(nc)) {
			break;
		}
		if (nc == '.' && (nc2 == 'S' || nc2 == 'D' || nc2 == 'X')) {
			float_status st = { 0 };
			nc = _totupper(**c);
			if (nc == '$') {
				(*c)++;
			}
			if (nc == '0' && _totupper((*c)[1]) == 'X') {
				(*c) += 2;
			}
			if (nc2 == 'S') {
				if (readhexx(c, val)) {
					*valx80 = float32_to_floatx80(*val, &st);
					return NUMTYTPE_S;
				}
			}
			if (nc2 == 'D') {
				uae_u32 val2;
				if (readhexx(c, val)) {
					if (readhexx(c, &val2)) {
						*valx80 = float64_to_floatx80((((uae_u64)(*val)) << 32) | val2, &st);
						return NUMTYTPE_D;
					}
				}
			}
			if (nc2 == 'X') {
				uae_u32 val1;
				uae_u32 val2, val3;
				if (readhexx(c, &val1)) {
					if (peekchar(c) == '.') {
						(*c)++;
					}
					if (readhexx(c, &val2)) {
						if (readhexx(c, &val3)) {
							valx80->high = val1;
							valx80->low = ((uae_u64)val2 << 32) | val3;
							return NUMTYTPE_X;
						}
					}
				}
			}
			return 0;
		}
	}