~ubuntu-branches/ubuntu/natty/luatex/natty

« back to all changes in this revision

Viewing changes to source/texk/web2c/luatexdir/luapeg/lpeg.c

  • Committer: Package Import Robot
  • Author(s): Norbert Preining
  • Date: 2010-12-13 23:22:59 UTC
  • mfrom: (0.2.1) (1.5.4) (4.3.12 experimental)
  • Revision ID: package-import@ubuntu.com-20101213232259-nqq2mq5z5x6qldw3
Tags: 0.65.0-1
* new upstream release
* ship two source packages as they are distributed by upstream, only
  renamed to match source package requirements. Fix debian/rules
  to install the manual pdf from the right place

Show diffs side-by-side

added added

removed removed

Lines of Context:
478
478
      case IBackCommit: {
479
479
        assert(stack > stackbase && (stack - 1)->s != NULL);
480
480
        s = (--stack)->s;
 
481
        captop = stack->caplevel; /* patch from RI, 20101101 */
481
482
        p += p->i.offset;
482
483
        continue;
483
484
      }
693
694
  for (i = from; i < to; i += sizei(op + i)) {
694
695
    if (op[i].i.code == IPartialCommit && op[i].i.offset < 0) {  /* loop? */
695
696
      int start = dest(op, i);
696
 
      assert(op[start - 1].i.code == IChoice && dest(op, start - 1) == i + 1);
 
697
      /* assert(op[start - 1].i.code == IChoice && dest(op, start - 1) == i + 1); */
697
698
      if (start <= lastopen) {  /* loop does contain an open call? */
698
699
        if (!verify(L, op, op + start, op + i, postable, rule)) /* check body */
699
700
          luaL_error(L, "possible infinite loop in %s", val2str(L, rule));