anchor.diff:        erlang:exit({bad_label, {nfc, "Label must be in Normalization Form C"}})
     end.
   
  -check_hyphen(Label) ->
  +
  +
  +check_hyphen(Label) when length(Label) >= 3 ->
     case lists:nthtail(2, Label) of
       [$-, $-|_] ->
         ErrorMsg = error_msg("Label ~p has disallowed hyphens in 3rd and 4th position", [Label]),
  
positive.code:         true ->
            check_context(Rest, Label, Pos + 1);
          false ->
            ErrorMsg = error_msg("Joiner ~p pnot allowed at posion ~p in ~p", [CP, Pos, Label]),
            erlang:exit({bad_label, {contextj, ErrorMsg}})
        end;
      _ ->
        ErrorMsg = error_msg("Codepoint ~p not allowed at posion ~p in ~p", [CP, Pos, Label]),
        erlang:exit({bad_label, {contextj, ErrorMsg}})
    end;
  check_context([], _, _) ->
    ok.
  
negative.code: %% -*- coding: utf-8 -*-
  -module(idna).
  
  %% API
  