Mercurial > urweb

annotate tests/xcomments.ur @ 1550:daf71c76707e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Postgres deadlock triggers unlimited retry
author Adam Chlipala <adam@chlipala.net>
date Sun, 28 Aug 2011 14:01:41 -0400
parents 43ca083678f8
children
rev   line source
adam@1283 1 fun foo () = <xml>Hi!</xml>
adam@1283 2
adam@1283 3 (* fun bar () = return (* No *)<xml>Yes!</xml> *)
adam@1283 4
adam@1283 5 fun main () = return <xml><body>
adam@1283 6 A (* B *) C (* D (* E *) F *) D<br/>
adam@1284 7 <b>A</b> <i>(* B *) C <b>D (* E <!-- 7 --> *) F {foo ()}</b></i>
adam@1284 8 A <!-- B --> C <!-- D (* E *) F --> D<br/>
adam@1284 9 <b>A</b> <i><!-- B --> C <b>D <!-- E --> F {foo ()}</b></i>
adam@1283 10 </body></xml>