diff options
Diffstat (limited to 'tests/jsparse.ur')
-rw-r--r-- | tests/jsparse.ur | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/jsparse.ur b/tests/jsparse.ur new file mode 100644 index 00000000..de6c9f1a --- /dev/null +++ b/tests/jsparse.ur @@ -0,0 +1,8 @@ +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> |