procyberian/nasm
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

For consistency, allow 0p.. prefix for packed BCD

Browse source 
Allow 0p... to be used as a prefix, for analogy with base conversion.
This commit is contained in:
H. Peter Anvin 2008-07-03 20:16:07 -07:00
parent 45f22924ea
commit 63ebf1650c
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
float.c
View file

@ -638,14 +638,13 @@ enum floats {
FL_SNAN
};
static int to_packed_bcd(const char *str, const char *strend,
static int to_packed_bcd(const char *str, const char *p,
int s, uint8_t *result,
const struct ieee_format *fmt)
{
int n = 0;
char c;
int tv = -1;
const char *p = strend-2;
if (fmt != &ieee_80) {
error(ERR_NONFATAL|ERR_PASS1,
@ -715,7 +714,7 @@ static int to_float(const char *str, int s, uint8_t *result,
strend = strchr(str, '\0');
if (strend[-1] == 'P' || strend[-1] == 'p')
return to_packed_bcd(str, strend, s, result, fmt);
return to_packed_bcd(str, strend-2, s, result, fmt);
if (str[0] == '_') {
/* Special tokens */
@ -760,6 +759,8 @@ static int to_float(const char *str, int s, uint8_t *result,
case 't': case 'T':
ok = ieee_flconvert(str+2, mant, &exponent);
break;
case 'p': case 'P':
return to_packed_bcd(str+2, strend-1, s, result, fmt);
default:
/* Leading zero was just a zero? */
ok = ieee_flconvert(str, mant, &exponent);