users/19097: remove $functypetrace in favour of ref to $zsheval_context

This commit is contained in:
Peter Stephenson
2014-09-18 19:09:52 +01:00
parent 9c29a4f1f6
commit 08e5191ff0
3 changed files with 15 additions and 52 deletions

View File

@@ -640,41 +640,6 @@ funcfiletracegetfn(UNUSED(Param pm))
return ret;
}
/* Functions for the functypestack special parameter. */
static char **
functypestackgetfn(UNUSED(Param pm))
{
Funcstack f;
int num;
char **ret, **p;
for (f = funcstack, num = 0; f; f = f->prev, num++);
ret = (char **) zhalloc((num + 1) * sizeof(char *));
for (f = funcstack, p = ret; f; f = f->prev, p++)
{
switch (f->tp)
{
case FS_SOURCE:
*p = "source";
break;
case FS_FUNC:
*p = "function";
break;
case FS_EVAL:
*p = "eval";
break;
}
}
*p = NULL;
return ret;
}
/* Functions for the builtins special parameter. */
/**/
@@ -2081,8 +2046,6 @@ static const struct gsu_array funcsourcetrace_gsu =
{ funcsourcetracegetfn, arrsetfn, stdunsetfn };
static const struct gsu_array funcfiletrace_gsu =
{ funcfiletracegetfn, arrsetfn, stdunsetfn };
static const struct gsu_array functypestack_gsu =
{ functypestackgetfn, arrsetfn, stdunsetfn };
static const struct gsu_array reswords_gsu =
{ reswordsgetfn, arrsetfn, stdunsetfn };
static const struct gsu_array disreswords_gsu =
@@ -2127,8 +2090,6 @@ static struct paramdef partab[] = {
scanpmfunctions),
SPECIALPMDEF("functrace", PM_ARRAY|PM_READONLY,
&functrace_gsu, NULL, NULL),
SPECIALPMDEF("functypestack", PM_ARRAY|PM_READONLY,
&functypestack_gsu, NULL, NULL),
SPECIALPMDEF("galiases", 0,
&pmgaliases_gsu, getpmgalias, scanpmgaliases),
SPECIALPMDEF("history", PM_READONLY,