Mercurial > hg > xemacs-beta
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; |