Mercurial > hg > Members > kono > os9 > sbc09
comparison a09.c @ 11:ce7323f9b937
fix
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Fri, 06 Jul 2018 18:31:38 +0900 |
parents | 96a067cf4c4f |
children | 111e5defb8ab |
comparison
equal
deleted
inserted
replaced
10:2a1338b218bf | 11:ce7323f9b937 |
---|---|
449 skipspace(); | 449 skipspace(); |
450 c=*srcptr; | 450 c=*srcptr; |
451 if(isalpha(c))return scanlabel(); | 451 if(isalpha(c))return scanlabel(); |
452 else if(isdigit(c))return scandecimal(); | 452 else if(isdigit(c))return scandecimal(); |
453 else switch(c) { | 453 else switch(c) { |
454 case '.' : | 454 case '*' : if(prevloc) { srcptr++;exprcat|=2;return prevloc-1; } |
455 case '*' : srcptr++;exprcat|=2;return loccounter; | 455 case '.' : srcptr++;exprcat|=2;return loccounter; |
456 case '$' : return scanhex(); | 456 case '$' : return scanhex(); |
457 case '%' : return scanbin(); | 457 case '%' : return scanbin(); |
458 case '&' : /* compatibility */ | 458 case '&' : /* compatibility */ |
459 case '@' : return scanoct(); | 459 case '@' : return scanoct(); |
460 case '\'' : return scanchar(); | 460 case '\'' : return scanchar(); |