anchor.diff:          eq when B3 =:= eq -> only_ws_binary(Cs, <<A/binary,B1:6,(B2 bsr 4):2>>);
           eq                -> only_ws_binary(Cs, <<A/binary,B1:6,B2:6,(B3 bsr 2):4>>);
           B4                -> decode_binary(Cs, <<A/binary,B1:6,B2:6,B3:6,B4:6>>)
  +    end.
  +
  +only_ws_binary(<<>>, A) ->
  +    A;
  +only_ws_binary(<<C:8, Cs/bits>>, A) ->
  +    case b64d(C) of
  +        ws -> only_ws_binary(Cs, A);
  +        _ -> erlang:error(function_clause)
       end.
   
   decode_list_to_string([C1 | Cs]) ->
  
positive.code:       DataString :: ascii_string().
  
  decode_to_string(Bin) when is_binary(Bin) ->
      decode_binary_to_string(Bin);
  decode_to_string(List) when is_list(List) ->
      decode_list_to_string(List).
  
  
negative.code:       Base64String :: ascii_string().
  
  encode_to_string(Bin) when is_binary(Bin) ->
      encode_to_string(binary_to_list(Bin));
  encode_to_string(List) when is_list(List) ->
      encode_list_to_string(List).
  
  