Mercurial > urweb
view tests/fromStringErr.ur @ 830:d07980bf1444
Defer pattern-matching exhaustiveness checks and normalize pattern types more thoroughly
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sat, 30 May 2009 14:44:29 -0400 |
parents | df02b09ff1ed |
children |
line wrap: on
line source
fun main () : transaction page = return <html><body> 3 = {cdata (show _ (readError _ "3" : int))}<br/> 12.12 = {cdata (show _ (readError _ "12.12" : float))}<br/> Hi = {cdata (show _ (readError _ "Hi" : string))}<br/> True = {cdata (show _ (readError _ "True" : bool))}<br/> </body></html>