do
  {- do IO computations here -}
`catchDyn` \ex -> do
  {- handle exception "ex" here -}