Mercurial > urweb
annotate tests/firebug.ur @ 1489:4437b008e0ab
Narrow Maybe match case.
| author | Karn Kallio <kkallio@eka> |
|---|---|
| date | Wed, 06 Jul 2011 18:54:23 -0430 |
| parents | 5f72a66402f7 |
| children |
| rev | line source |
|---|---|
| adamc@1088 | 1 fun main () = |
| adamc@1088 | 2 a <- source "some text"; |
| adamc@1088 | 3 return <xml><body> |
| adamc@1088 | 4 <label>A: <ctextbox source={a}/></label> |
| adamc@1088 | 5 </body></xml> |