Mercurial > urweb

view tests/xcomments.ur @ 1474:3d0cc841cafd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixes to work nicely with OS X and Clang (thanks to Austin Seipp)
author Adam Chlipala <adam@chlipala.net>
date Fri, 17 Jun 2011 11:52:56 -0400
parents 43ca083678f8
children
line wrap: on
line source
fun foo () = <xml>Hi!</xml>

(* fun bar () = return (* No *)<xml>Yes!</xml> *)

fun main () = return <xml><body>
  A (* B *) C (* D (* E *) F *) D<br/>
  <b>A</b> <i>(* B *) C <b>D (* E <!-- 7 --> *) F {foo ()}</b></i>
  A <!-- B --> C <!-- D (* E *) F --> D<br/>
  <b>A</b> <i><!-- B --> C <b>D <!-- E --> F {foo ()}</b></i>
</body></xml>