anchor.diff:      /// generation failed on a tuple item with an exception
       let inline deserializeErrorTuple name (t : Type) ex =
           deserializeError "tuple item" name t ex
  +
  +    /// Throw an exception if the creation of the specified type
  +    /// failed unexpectedly
  +    let inline deserializeErrorCreateInst (t : Type) ex =
  +        if XmlConfig.Instance.ThrowOnError then
  +            let msg = sprintf "Failed to create an instance of type %s" t.FullName
  +            raise <| SharpXmlException(msg, ex)
   
       /// Apply attribute values if necessary
       let setAttributes (builder : TypeBuilderInfo) attrs inst =
  
positive.code:         else
              eatSomeTag info |> fst, []
  
      let parseList<'a> (elemInfo : TypeBuilderInfo option) (elemParser : ReaderFunc) attr (info : ParserInfo) =
          let list = List<'a>()
          let rec inner() =
              if not info.IsEnd then
  
negative.code:     /// Specialized reader function for string arrays
      let stringArrayReader attr xml =
          let ctor = EmptyConstructor(fun () -> box String.Empty)
          let info = emptyTypeBuilder typeof<string> ctor
          listReader<string> info ValueTypeDeserializer.stringReader attr xml |> List.toArray |> box
  
      /// Specialized reader function for integer arrays
      let intArrayReader attr xml =
          let ctor = EmptyConstructor(fun () -> box 0)
          let info = emptyTypeBuilder typeof<int> ctor
          let intReader = Int32.Parse >> box |> ValueTypeDeserializer.buildValueReader
          listReader<int> info intReader attr xml |> List.toArray |> box
  
  