comparison src/syntax.c @ 88:821dec489c24 r20-0

Import from CVS: tag r20-0
author cvs
date Mon, 13 Aug 2007 09:09:59 +0200
parents c7528f8e288d
children 3bb7ccffb0c0
comparison
equal deleted inserted replaced
87:7df2982f5c17 88:821dec489c24
1367 curlevel->last = from - 1; 1367 curlevel->last = from - 1;
1368 if (++curlevel == endlevel) 1368 if (++curlevel == endlevel)
1369 error ("Nesting too deep for parser"); 1369 error ("Nesting too deep for parser");
1370 curlevel->prev = -1; 1370 curlevel->prev = -1;
1371 curlevel->last = -1; 1371 curlevel->last = -1;
1372 if (!--targetdepth) goto done; 1372 if (targetdepth == depth) goto done;
1373 break; 1373 break;
1374 1374
1375 case Sclose: 1375 case Sclose:
1376 depth--; 1376 depth--;
1377 if (depth < mindepth) 1377 if (depth < mindepth)
1378 mindepth = depth; 1378 mindepth = depth;
1379 if (curlevel != levelstart) 1379 if (curlevel != levelstart)
1380 curlevel--; 1380 curlevel--;
1381 curlevel->prev = curlevel->last; 1381 curlevel->prev = curlevel->last;
1382 if (!++targetdepth) goto done; 1382 if (targetdepth == depth) goto done;
1383 break; 1383 break;
1384 1384
1385 case Sstring: 1385 case Sstring:
1386 { 1386 {
1387 Emchar ch; 1387 Emchar ch;