view tests/alert.ur @ 597:d49d58a69877

Injected a non-special-case datatype
author Adam Chlipala <adamc@hcoop.net>
date Thu, 08 Jan 2009 10:30:14 -0500
parents 1901db85acb4
children
line wrap: on
line source
fun main () : transaction page = return <xml><body>
    <a onclick={alert "You clicked it!  That's some fancy shooting!"}>Click Me!</a>
  </body></xml>