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