#1581 sublis & sublis_apply_lambda:true causing lisp errors

[Barton Willis]

(%i1) sublis([f = lambda([[x]],'g)], f[2](x));
Maxima encountered a Lisp error:

The subst function does this OK.

[Kris Katterjohn]

This only happens when sublis_apply_lambda is true and does not depend on subscripted functions:

(%i1) sublis_apply_lambda : false$

(%i2) sublis ([f = lambda ([], 'g)], f () ());
(%o2) lambda([],'g)()()

(%i3) sublis_apply_lambda : true$

(%i4) sublis ([f = lambda ([], 'g)], f () ());
<lisp error>

I have a fix that I'll commit and push soon.

[Kris Katterjohn]

This has been fixed by commit [bdd809].

(%i1) sublis_apply_lambda : false$

(%i2) sublis ([f = lambda ([], 'g)], f () ());
(%o2) lambda([],'g)()()

(%i3) sublis_apply_lambda : true$

(%i4) sublis ([f = lambda ([], 'g)], f () ());
(%o4) g()