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();