Mercurial > urweb
comparison jslib/urweb.js @ 585:35471f067980
Reactive record pattern
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 01 Jan 2009 11:04:09 -0500 |
parents | 101eb0058136 |
children | 1c969230ee7f |
comparison
equal
deleted
inserted
replaced
584:101eb0058136 | 585:35471f067980 |
---|---|
1 function cons(v, ls) { | 1 function cons(v, ls) { |
2 return { n : ls, v : v }; | 2 return { n : ls, v : v }; |
3 } | 3 } |
4 function callAll(ls) { | 4 function callAll(ls) { |
5 for (; ls; ls = ls.next) | 5 for (; ls; ls = ls.n) |
6 ls.v(); | 6 ls.v(); |
7 } | 7 } |
8 | 8 |
9 function sc(v) { | 9 function sc(v) { |
10 return {v : v, h : null}; | 10 return {v : v, h : null}; |