view tests/style.ur @ 1820:3c56aa6a0f55

Reduce default inlining thresholds; improve a let-substitution optimization to compensate
author Adam Chlipala <adam@chlipala.net>
date Fri, 14 Sep 2012 07:35:48 -0400
parents 12ec14a6be0b
children
line wrap: on
line source
style q
style r

fun main () : transaction page = return <xml>
  <head>
    <link rel="stylesheet" type="text/css" href="http://www.schizomaniac.net/style.css" media="screen"/>
  </head>
  <body>
    Hi.  <span class={q}>And hi <span class={r}>again</span>!</span>
  </body>
</xml>