mpc: use new strtomp() c-style prefixes to parse integer constants
This commit is contained in:
parent
f5fcf6688b
commit
263b0e34b2
1 changed files with 6 additions and 2 deletions
|
@ -579,7 +579,9 @@ ecom(Node *f, Node *t)
|
||||||
return nil;
|
return nil;
|
||||||
|
|
||||||
if(f->c == NUM){
|
if(f->c == NUM){
|
||||||
m = strtomp(f->s->n, nil, 10, nil);
|
m = strtomp(f->s->n, nil, 0, nil);
|
||||||
|
if(m == nil)
|
||||||
|
diag(f, "bad constant");
|
||||||
if(mpcmp(m, mpzero) == 0){
|
if(mpcmp(m, mpzero) == 0){
|
||||||
f->c = NAME;
|
f->c = NAME;
|
||||||
f->s = sym("mpzero");
|
f->s = sym("mpzero");
|
||||||
|
@ -643,7 +645,9 @@ ecom(Node *f, Node *t)
|
||||||
|
|
||||||
switch(f->c){
|
switch(f->c){
|
||||||
case NUM:
|
case NUM:
|
||||||
m = strtomp(f->s->n, nil, 10, nil);
|
m = strtomp(f->s->n, nil, 0, nil);
|
||||||
|
if(m == nil)
|
||||||
|
diag(f, "bad constant");
|
||||||
if(mpsignif(m) <= 32)
|
if(mpsignif(m) <= 32)
|
||||||
cprint("uitomp(%udUL, %N);\n", mptoui(m), t);
|
cprint("uitomp(%udUL, %N);\n", mptoui(m), t);
|
||||||
else if(mpsignif(m) <= 64)
|
else if(mpsignif(m) <= 64)
|
||||||
|
|
Loading…
Reference in a new issue