anchor.diff:      Str = <<"hello">>,
       UStr = new(Str, latin1),
       %% just make sure data came through in utf16
  -    ?assertEqual(?UCB(UStr, ?NATIVE, latin1), Str).
  +    ?assertEqual(Str, ?UCB(UStr, ?NATIVE, latin1)).
   
   %% Make sure that new/2 is normalizing inputs correctly
   norm_test() ->
  
positive.code: 
  %% Make sure encoding/0 isn't lying
  encoding_test() ->
      ?assertEqual(encoding(), ?NATIVE).
  
  %% Check the different types of length against each other
  length_test() ->
  
negative.code:     UStr1 = new(Str1, utf16),
      UStr2 = new(Str2, utf16),
      %% Str1 should be canonical - renormalization shouldn't change it
      ?assertEqual(?UCB(Str1, utf32, ?NATIVE), UStr1),
      %% Str2 should canonicalize to Str1
      ?assertEqual(UStr1, UStr2).
  
  %% Check that toupper/1 up-cases basic ASCII
  upper_test() ->
      UStr = toupper(new(<<"hello">>, latin1)),
      ?assertEqual(<<"HELLO">>, ?UCB(UStr, ?NATIVE, latin1)).
  
  %% Check that toupper/1 up-cases basic non-ASCII Latin1
  nonascii_upper_test() ->
      UStr = toupper(new(<<"">>, latin1)),
      ?assertEqual(<<"">>, ?UCB(UStr, ?NATIVE, latin1)).
  
  %% Check that tolower/1 down-cases basic ASCII
  lower_test() ->
      UStr = tolower(new(<<"GOODBYE">>, latin1)),
      ?assertEqual(<<"goodbye">>, ?UCB(UStr, ?NATIVE, latin1)).
  
  %% Check that tolower/1 down-cases basic non-ASCII Latin1
  nonascii_lower_test() ->
  