comparison tests/rpc.ur @ 609:56aaa1941dad

First gimpy RPC
author Adam Chlipala <adamc@hcoop.net>
date Sun, 15 Feb 2009 10:32:50 -0500
parents 0dd40b6bfdf3
children
comparison
equal deleted inserted replaced
608:330a7de47914 609:56aaa1941dad
6 in 6 in
7 s <- source 0; 7 s <- source 0;
8 return <xml><body> 8 return <xml><body>
9 <button value="Get It On!" 9 <button value="Get It On!"
10 onclick={n <- getNext (); 10 onclick={n <- getNext ();
11 set s n}/> 11 set s n}/><br/>
12 <br/>
13 Current: <dyn signal={n <- signal s; return <xml>{[n]}</xml>}/>
12 </body></xml> 14 </body></xml>
13 end 15 end