mirrors/zsh
1
0
Fork 0
mirror of git://git.code.sf.net/p/zsh/code synced 2026-01-04 21:11:19 +01:00
Code Releases Activity

20214: fix debugging test with recursive functions

Browse source
This commit is contained in:
Peter Stephenson 2004-07-28 10:34:31 +00:00
parent e31d0b939d
commit 241aa1d40d
2 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
ChangeLog
View file

@ -1,5 +1,8 @@
2004-07-28 Peter Stephenson <pws@csr.com>
* 20214: Src/parse.c: fix debugging test that didn't work
with recursive functions.
* 20204: Motoi Washida: Completion/Base/Utils/_retrieve_cache:
typo in definition of _cache_dir.

5
Src/parse.c
View file

@ -2168,7 +2168,10 @@ freeeprog(Eprog p)
/* paranoia */
DPUTS(p->nref > 0 && (p->flags & EF_HEAP), "Heap EPROG has nref > 0");
DPUTS(p->nref < 0 && !(p->flags & EF_HEAP), "Real EPROG has nref < 0");
DPUTS(p->nref < -1 || p->nref > 256, "Uninitialised EPROG nref");
DPUTS(p->nref < -1, "Uninitialised EPROG nref");
#ifdef MAX_FUNCTION_DEPTH
DPUTS(p->nref > MAX_FUNCTION_DEPTH + 10, "Overlarge EPROG nref");
#endif
if (p->nref > 0 && !--p->nref) {
for (i = p->npats, pp = p->pats; i--; pp++)
freepatprog(*pp);