comparison tests/lengthGe.ur @ 1624:f96e708b4b93
Client-side strlenGe
| author |
Adam Chlipala <adam@chlipala.net> |
| date |
Sat, 03 Dec 2011 16:05:06 -0500 |
| parents |
|
| children |
|
comparison
equal
deleted
inserted
replaced
| |
1 fun main () : transaction page = |
| |
2 s <- source ""; |
| |
3 return <xml><body> |
| |
4 <ctextbox source={s}/> |
| |
5 <dyn signal={v <- signal s; |
| |
6 return (txt (strlenGe v 3))}/> |
| |
7 </body></xml> |
