blob: bce269bdb4d7eea726994e515c037bd2e9bd1d8f (
plain)
1
2
3
4
5
6
7
|
open Json
fun main () : transaction page = return <xml><body>
<pre>{[ fromJson "\"\\\\line \/ 1\\nline 2\"" : string ]}</pre><br/>
<pre>{[fromJson "[1, 2, 3]" : list int]}</pre><br/>
<pre>{[toJson ("hi" :: "bye\"" :: "hehe" :: [])]}</pre>
</body></xml>
|
