annotate tests/rec3.ur @ 1036:e214ac93d73e

Deal with bizarre IE6 .innerHTML behavior (which eats some <script> tags)
author Adam Chlipala <adamc@hcoop.net>
date Sat, 21 Nov 2009 13:50:59 -0500
parents 71bafe66dbe1
children
rev   line source
adamc@134 1 val rec main = fn () => <html><body>
adamc@134 2 <a link={aux ()}>See another page</a>
adamc@134 3 </body></html>
adamc@134 4
adamc@134 5 and aux = fn () => <html><body>
adamc@134 6 <h1>The Main Event</h1>
adamc@134 7
adamc@134 8 {auxer ()}
adamc@134 9 </body></html>
adamc@134 10
adamc@134 11 and auxer = fn () => <body>
adamc@134 12 <a link={main ()}>Back to square one</a>
adamc@134 13 </body>