diff options
author | Tanaka Akira <akr@users.sourceforge.net> | 2000-02-23 15:18:43 +0000 |
---|---|---|
committer | Tanaka Akira <akr@users.sourceforge.net> | 2000-02-23 15:18:43 +0000 |
commit | 1054071bd60937ae8a9fbc16c1407211c6198a55 (patch) | |
tree | d91747424173fe809ec204864df49009874b6282 /Src/Modules/zprof.c | |
parent | 2b37049c221501c6ae77e0308634aebcdb10060d (diff) | |
download | zsh-1054071bd60937ae8a9fbc16c1407211c6198a55.tar.gz zsh-1054071bd60937ae8a9fbc16c1407211c6198a55.tar.xz zsh-1054071bd60937ae8a9fbc16c1407211c6198a55.zip |
zsh-workers/9839
Diffstat (limited to 'Src/Modules/zprof.c')
-rw-r--r-- | Src/Modules/zprof.c | 34 |
1 files changed, 15 insertions, 19 deletions
diff --git a/Src/Modules/zprof.c b/Src/Modules/zprof.c index 59fea3154..5c602ec18 100644 --- a/Src/Modules/zprof.c +++ b/Src/Modules/zprof.c @@ -224,28 +224,24 @@ zprof_wrapper(Eprog prog, FuncWrap w, char *name) double prev, now; if (!(f = findpfunc(name))) { - PERMALLOC { - f = (Pfunc) zalloc(sizeof(*f)); - f->name = ztrdup(name); - f->calls = 0; - f->time = f->self = 0.0; - f->next = calls; - calls = f; - ncalls++; - } LASTALLOC; + f = (Pfunc) zalloc(sizeof(*f)); + f->name = ztrdup(name); + f->calls = 0; + f->time = f->self = 0.0; + f->next = calls; + calls = f; + ncalls++; } if (stack) { if (!(a = findparc(stack->p, f))) { - PERMALLOC { - a = (Parc) zalloc(sizeof(*a)); - a->from = stack->p; - a->to = f; - a->calls = 0; - a->time = a->self = 0.0; - a->next = arcs; - arcs = a; - narcs++; - } LASTALLOC; + a = (Parc) zalloc(sizeof(*a)); + a->from = stack->p; + a->to = f; + a->calls = 0; + a->time = a->self = 0.0; + a->next = arcs; + arcs = a; + narcs++; } } sf.prev = stack; |