annotate tests/toString.ur @ 315:e21d0dddda09

Unpoly non-recursive function
author Adam Chlipala <adamc@hcoop.net>
date Thu, 11 Sep 2008 09:36:47 -0400
parents df00701f2323
children
rev   line source
adamc@284 1 fun main () : transaction page = return <html><body>
adamc@290 2 6 = {cdata (show _ 6)}<br/>
adamc@290 3 12.34 = {cdata (show _ 12.34)}<br/>
adamc@290 4 Hi = {cdata (show _ "Hi")}<br/>
adamc@290 5 False = {cdata (show _ False)}<br/>
adamc@284 6 </body></html>