anchor.diff:      },
       return_new_fun(Repr1).
   
  -return_new_fun(Repr) ->
  +return_new_fun(#yaml_repr{simple_structs = Simple} = Repr) ->
       Fun = fun
  -        (get_repr) -> Repr;
  -        (T)        -> represent(Repr, T)
  +        (get_docs) when Simple ->
  +            [Doc#yaml_doc.root || Doc <- Repr#yaml_repr.docs];
  +        (get_docs) ->
  +            Repr#yaml_repr.docs;
  +        (get_repr) ->
  +            Repr;
  +        (T) ->
  +            represent(Repr, T)
       end,
       {ok, Fun}.
   
  
positive.code: string(String, Options) ->
      Parser_Options = initialize(Options),
      Parser = yaml_parser:string(String, Parser_Options),
      Repr   = (yaml_parser:get_token_fun(Parser))(get_repr),
      Repr#yaml_repr.docs.
  
  file(Filename) ->
      file(Filename, []).
  
negative.code:     Parser = yaml_parser:next_chunk(Parser, More_Data, EOS),
      if
          EOS ->
              (yaml_parser:get_token_fun(Parser))(get_docs);
          true ->
              Parser
      end.
  