annotate tests/fromStringErr.ur @ 837:ccf22c2c77b2
Tweak -- precedence; use right env for final exhaustiveness errors
| author |
Adam Chlipala <adamc@hcoop.net> |
| date |
Tue, 02 Jun 2009 15:43:18 -0400 |
| parents |
df02b09ff1ed |
| children |
|
| rev |
line source |
|
adamc@292
|
1 fun main () : transaction page = return <html><body>
|
|
adamc@292
|
2 3 = {cdata (show _ (readError _ "3" : int))}<br/>
|
|
adamc@293
|
3 12.12 = {cdata (show _ (readError _ "12.12" : float))}<br/>
|
|
adamc@294
|
4 Hi = {cdata (show _ (readError _ "Hi" : string))}<br/>
|
|
adamc@293
|
5 True = {cdata (show _ (readError _ "True" : bool))}<br/>
|
|
adamc@292
|
6 </body></html>
|
