adam@1731: fun main n =
adam@1731:   case n of
adam@1731:       0 => error <xml>Zero is bad! <button value="Capische?" onclick={alert "GOOD!"}/></xml>
adam@1731:     | _ => return <xml/>