Fixed LexNumber to properly replace LexFloat.
git-svn-id: https://svn.code.sf.net/p/fteqw/code/trunk@3356 fc73d0e0-1445-4013-8a0c-d673dee63da5
This commit is contained in:
parent
09a31850aa
commit
5e5ad719c2
1 changed files with 14 additions and 1 deletions
|
@ -1331,6 +1331,7 @@ int QCC_PR_LexInteger (void)
|
||||||
|
|
||||||
void QCC_PR_LexNumber (void)
|
void QCC_PR_LexNumber (void)
|
||||||
{
|
{
|
||||||
|
int tokenlen = 0;
|
||||||
int num=0;
|
int num=0;
|
||||||
int base=10;
|
int base=10;
|
||||||
int c;
|
int c;
|
||||||
|
@ -1339,32 +1340,41 @@ void QCC_PR_LexNumber (void)
|
||||||
{
|
{
|
||||||
sign=-1;
|
sign=-1;
|
||||||
pr_file_p++;
|
pr_file_p++;
|
||||||
|
|
||||||
|
pr_token[tokenlen++] = '-';
|
||||||
}
|
}
|
||||||
if (pr_file_p[1] == 'x')
|
if (pr_file_p[0] == '0' && pr_file_p[1] == 'x')
|
||||||
{
|
{
|
||||||
pr_file_p+=2;
|
pr_file_p+=2;
|
||||||
base = 16;
|
base = 16;
|
||||||
|
|
||||||
|
pr_token[tokenlen++] = '0';
|
||||||
|
pr_token[tokenlen++] = 'x';
|
||||||
}
|
}
|
||||||
|
|
||||||
while((c = *pr_file_p))
|
while((c = *pr_file_p))
|
||||||
{
|
{
|
||||||
if (c >= '0' && c <= '9')
|
if (c >= '0' && c <= '9')
|
||||||
{
|
{
|
||||||
|
pr_token[tokenlen++] = c;
|
||||||
num*=base;
|
num*=base;
|
||||||
num += c-'0';
|
num += c-'0';
|
||||||
}
|
}
|
||||||
else if (c >= 'a' && c <= 'f')
|
else if (c >= 'a' && c <= 'f')
|
||||||
{
|
{
|
||||||
|
pr_token[tokenlen++] = c;
|
||||||
num*=base;
|
num*=base;
|
||||||
num += c -'a'+10;
|
num += c -'a'+10;
|
||||||
}
|
}
|
||||||
else if (c >= 'A' && c <= 'F')
|
else if (c >= 'A' && c <= 'F')
|
||||||
{
|
{
|
||||||
|
pr_token[tokenlen++] = c;
|
||||||
num*=base;
|
num*=base;
|
||||||
num += c -'A'+10;
|
num += c -'A'+10;
|
||||||
}
|
}
|
||||||
else if (c == '.')
|
else if (c == '.')
|
||||||
{
|
{
|
||||||
|
pr_token[tokenlen++] = c;
|
||||||
pr_file_p++;
|
pr_file_p++;
|
||||||
pr_immediate_type = type_float;
|
pr_immediate_type = type_float;
|
||||||
pr_immediate._float = (float)num;
|
pr_immediate._float = (float)num;
|
||||||
|
@ -1388,6 +1398,7 @@ void QCC_PR_LexNumber (void)
|
||||||
}
|
}
|
||||||
else if (c == 'i')
|
else if (c == 'i')
|
||||||
{
|
{
|
||||||
|
pr_token[tokenlen++] = 'x';
|
||||||
pr_file_p++;
|
pr_file_p++;
|
||||||
pr_immediate_type = type_integer;
|
pr_immediate_type = type_integer;
|
||||||
pr_immediate._int = num*sign;
|
pr_immediate._int = num*sign;
|
||||||
|
@ -1396,6 +1407,7 @@ void QCC_PR_LexNumber (void)
|
||||||
else break;
|
else break;
|
||||||
pr_file_p++;
|
pr_file_p++;
|
||||||
}
|
}
|
||||||
|
pr_token[tokenlen++] = 0;
|
||||||
|
|
||||||
if (flag_assume_integer)
|
if (flag_assume_integer)
|
||||||
{
|
{
|
||||||
|
@ -2510,6 +2522,7 @@ void QCC_PR_Lex (void)
|
||||||
if ( (c == '.'&&pr_file_p[1] >='0' && pr_file_p[1] <= '9') || (c >= '0' && c <= '9') || ( c=='-' && pr_file_p[1]>='0' && pr_file_p[1] <='9') )
|
if ( (c == '.'&&pr_file_p[1] >='0' && pr_file_p[1] <= '9') || (c >= '0' && c <= '9') || ( c=='-' && pr_file_p[1]>='0' && pr_file_p[1] <='9') )
|
||||||
{
|
{
|
||||||
pr_token_type = tt_immediate;
|
pr_token_type = tt_immediate;
|
||||||
|
|
||||||
// pr_immediate_type = type_float;
|
// pr_immediate_type = type_float;
|
||||||
// pr_immediate._float = QCC_PR_LexFloat ();
|
// pr_immediate._float = QCC_PR_LexFloat ();
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue