Mercurial > urweb
comparison tests/link.lac @ 111:2d6116de9cca
Closure code generation almost there
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 13 Jul 2008 12:06:47 -0400 |
parents | 3739af9e727a |
children | f0d3402184d1 |
comparison
equal
deleted
inserted
replaced
110:3739af9e727a | 111:2d6116de9cca |
---|---|
2 Welcome to the ancillary page! | 2 Welcome to the ancillary page! |
3 </html> | 3 </html> |
4 | 4 |
5 val main : {} -> xhtml = fn () => <html><body> | 5 val main : {} -> xhtml = fn () => <html><body> |
6 <a link={ancillary ()}>Enter the unknown!</a> | 6 <a link={ancillary ()}>Enter the unknown!</a> |
7 | |
8 <a link={ancillary ()}>Alternate route!</a> | |
9 </body></html> | 7 </body></html> |