XML_Encoding

type XML_Encoding = record

  map: array [0..255] of int;

  data: pointer;

  convert: function(

  data: pointer;

  s: char_ptr

):int;

  release: procedure(

  data: pointer

);

end;