Mercurial > urweb

view tests/jsparse.ur @ 1132:d4cd54a4ea06

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
First attempt to switch to Automake, to get shared libraries built in OSX
author Adam Chlipala <adamc@hcoop.net>
date Thu, 28 Jan 2010 09:56:08 -0500
parents c270fb847dc2
children
line wrap: on
line source
fun main () =
    s <- source "13";
    return <xml><body>
      <ctextbox source={s}/>
      <dyn signal={v <- signal s; return (case read v : option int of
                                              None => <xml>None</xml>
                                            | Some n => <xml>Some {[n]}</xml>)}/>
      </body></xml>