anchor.diff:  -export([to_utf16be/1, from_utf16be/1, from_utf16be/2]).
   -export([to_utf16le/1, from_utf16le/1, from_utf16le/2]).
   -export([to_utf8/1, from_utf8/1]).
  +-export([from_latin9/1]).
   
   %%% NB: Non-canonical UTF-8 encodings and incorrectly used
   %%% surrogate-pair codes are disallowed by this code.  There are
  
positive.code: 	    exit({ucs,{bad_utf8_character_code}})
      end.
  
  
  
  
  
negative.code: 			  Cs=='l1';Cs=='ibm819';
  			  Cs=='cp819';Cs=='csisolatin1' ->
      Input;
  to_unicode(Input,Cs) when Cs=='iso_8859-15';Cs=='iso-8859-15';Cs=='latin9' ->
      from_latin9(Input);
  % to_unicode(Input,Cs) when Cs=='mnemonic';Cs=='"mnemonic+ascii+38';
  % 			  Cs=='mnem';Cs=='"mnemonic+ascii+8200' ->
  %     from_mnemonic(Input);
  