txlyre пре 3 недеља
родитељ
комит
7a725a30f3
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      jk.c

+ 1 - 1
jk.c

@@ -2149,7 +2149,7 @@ Nt*PPa(Pt*parser,Nt*a,enum Tkt tag){Tkt*tok;
   if((tok=Plook(parser,0))&&(tok->tag==tag||(tag==T_NUM&&tok->tag==T_BNUM))){Ar*as=An();
     Ap(as,a->v);
     do{a=PPatom(parser);
-      Ap(as,a->v);}WH((tok=Plook(parser,0))&&tok->tag==tag);R Nnl(Vna(as));}
+      Ap(as,a->v);}WH((tok=Plook(parser,0))&&(tok->tag==tag||(tag==T_NUM&&tok->tag==T_BNUM)));R Nnl(Vna(as));}
   R N;}
 Nt*_PPnoun(Pt*parser){Nt*n;
   Nt*a=PPatom(parser);