Mercurial > urweb

comparison lib/js/urweb.js @ 1798:10a2cb93d175

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Removed evaluation of js function name strings. (from Vladimir Shabanov)
author Adam Chlipala <adam@chlipala.net>
date Sun, 29 Jul 2012 12:54:17 -0400
parents 4671afac15af
children e3ec868567ce
comparison
equal deleted inserted replaced
1797:bb942416bf1c 1798:10a2cb93d175
1709 stack = cons({c: "1", n: e.n}, stack); 1709 stack = cons({c: "1", n: e.n}, stack);
1710 e = e.v; 1710 e = e.v;
1711 break; 1711 break;
1712 case "f": 1712 case "f":
1713 if (e.a == null) 1713 if (e.a == null)
1714 e = {c: "c", v: (eval(e.f))()}; 1714 e = {c: "c", v: e.f()};
1715 else { 1715 else {
1716 var args = []; 1716 var args = [];
1717 stack = cons({c: "f", f: eval(e.f), args: args, pos: 0, a: e.a.next}, stack); 1717 stack = cons({c: "f", f: e.f, args: args, pos: 0, a: e.a.next}, stack);
1718 if (!e.a.data.c) alert("[2] fr.f = " + e.f + "; 0 = " + e.a.data); 1718 if (!e.a.data.c) alert("[2] fr.f = " + e.f + "; 0 = " + e.a.data);
1719 e = e.a.data; 1719 e = e.a.data;
1720 } 1720 }
1721 break; 1721 break;
1722 case "l": 1722 case "l":