Skip to content

Instantly share code, notes, and snippets.

@thoughtpolice

thoughtpolice/test.ur

Created October 9, 2013 22:20
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save thoughtpolice/6909510 to your computer and use it in GitHub Desktop.
Save thoughtpolice/6909510 to your computer and use it in GitHub Desktop.
Download ZIP
Ur/Web bug
Raw
test.ur
fun main () = return (error <xml>BAD THING!</xml>)
Raw
test.urp
onError TestE.err
testE
test
Raw
test.urs
val main : unit -> transaction page
Raw
testE.ur
fun err r = return <xml><body>bad thing! {r} &copy; Tester</body></xml>
Raw
testE.urs
val err : xbody -> transaction page
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment