anchor.diff:                      let! y = f2 4
                       return ()
                   with
  -                | e -> data := e.Message
  +                | e -> data := e.Message.Trim('"')
               } 
               |> Async.StartImmediate
           f()
  
positive.code: let ``Async.Catch works``() =
      let assign res = function
          | Choice1Of2 msg -> res := msg
          | Choice2Of2 (ex: Exception) -> res := "ERROR: " + ex.Message
      let res1 = ref ""
      let res2 = ref ""
      async {
  
negative.code:                     failwith "1"
                      return x
                  with
                  | e -> return! failwith ("2 " + e.Message.Trim('"')) 
              }
          let f2 x = 
              async {
                  try
                      return! f1 x
                  with
                  | e -> return! failwith ("3 " + e.Message.Trim('"')) 
              }
          let f() =
              async { 
  