Mercurial > urweb
view tests/fromStringErr.ur @ 722:f06880c8bf68
Tiny increment to style test
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 12 Apr 2009 14:21:19 -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>