diff options
Diffstat (limited to 'demo/listFun.ur')
-rw-r--r-- | demo/listFun.ur | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/demo/listFun.ur b/demo/listFun.ur index 74f249b6..c4451e1d 100644 --- a/demo/listFun.ur +++ b/demo/listFun.ur @@ -12,6 +12,8 @@ functor Make(M : sig fun console (ls : list M.t) = return <xml><body> Current list: {toXml ls}<br/> + Length: {[length ls]}<br/> + <br/> <form> Add element: <textbox{#X}/> <submit action={cons ls}/> |