blob: eaa07fe2eddbb76e14eb6ef421e61d316ac60918 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
val rec main = fn () => <html><body>
<a link={aux ()}>See another page</a>
</body></html>
and aux = fn () => <html><body>
<h1>The Main Event</h1>
{auxer ()}
</body></html>
and auxer = fn () => <body>
<a link={main ()}>Back to square one</a>
</body>
|
