anchor.diff:      get_po_string(T);
   get_msgstr([_ | T]) ->
       get_msgstr(T).
  +
  +header_info({"",R}) -> {?GETTEXT_HEADER_INFO, R};  
  +header_info(X)      -> X.
   
   %%%
   %%% A PO-string has the same syntax as a C character string.
  
positive.code: to_list(B) when is_binary(B)  -> binary_to_list(B);
  to_list(L) when is_list(L)    -> L.
  
  
negative.code: get_po_string([$\r|T]) -> get_po_string(T);
  get_po_string([$\n|T]) -> get_po_string(T);
  get_po_string([$\t|T]) -> get_po_string(T);
  get_po_string([$"|T])  -> eat_string(T).
  
  eat_string(S) ->
      eat_string(S,[]).
  