view tests/onerrorE.ur @ 1305:a6fc03d28170

Fix infinite looping bug in Great Unification Fix
author Adam Chlipala <adam@chlipala.net>
date Sun, 10 Oct 2010 15:54:51 -0400
parents b4480a56cab7
children
line wrap: on
line source
fun err x = return <xml><body>
  <h1>Bad thing!</h1>

  {x}
</body></xml>