Mercurial > hg > Members > kono > os9 > sbc09
diff 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 |
line wrap: on
line diff
--- a/a09.c Thu Jul 05 18:37:11 2018 +0900 +++ b/a09.c Fri Jul 06 18:31:38 2018 +0900 @@ -451,8 +451,8 @@ if(isalpha(c))return scanlabel(); else if(isdigit(c))return scandecimal(); else switch(c) { - case '.' : - case '*' : srcptr++;exprcat|=2;return loccounter; + case '*' : if(prevloc) { srcptr++;exprcat|=2;return prevloc-1; } + case '.' : srcptr++;exprcat|=2;return loccounter; case '$' : return scanhex(); case '%' : return scanbin(); case '&' : /* compatibility */