* Lam -> Function. Doh!

This commit is contained in:
Eelco Dolstra 2003-08-14 09:29:07 +00:00
parent 95b49f8044
commit 0a2de7f543

View file

@ -53,7 +53,7 @@ static Expr substExpr(string x, Expr rep, Expr e)
else
return e;
if (ATmatch(e, "Lam(<str>, <term>)", &s, &e2))
if (ATmatch(e, "Function(<str>, <term>)", &s, &e2))
if (x == s)
return e;
/* !!! unfair substitutions */