anchor.diff:          else
               eatSomeTag info |> fst, []
   
  -    let parseList<'a> (elemInfo : TypeBuilderInfo option) (elemParser : ReaderFunc) attr (info : ParserInfo) =
  +    let parseList<'a> (elemInfo : TypeBuilderInfo) (elemParser : ReaderFunc) attr (info : ParserInfo) =
           let list = List<'a>()
           let rec inner() =
               if not info.IsEnd then
  
positive.code:                         list.Add(value)
                          inner()
                      | TagType.Single ->
                          // a single XML tag could contain attributes
                          // in that case we have to instantiate a new item
                          // and try to set its attribute properties
                          match elemInfo with
                          | Some i ->
                              let value = i.Ctor.Invoke() :?> 'a
                              list.Add(value)
                              if not attrs.IsEmpty then
                                  Deserialization.setAttributes i attrs value
                          | _ -> ()
                          inner()
                      | _ -> ()
          inner()
  
negative.code:                             let propInstance = prop.Ctor.Invoke()
                              prop.Setter.Invoke(instance, propInstance)
                          with ex ->
                              Deserialization.deserializeErrorCreateInst prop.Info.PropertyType ex
                      | _ -> Deserialization.elementNotExist name builder.Type
                      inner()
                  | _ -> ()
  