anchor.diff:                {char, hd(binary_to_list(Char)), Idx}
         end).
   
  +%% done
   -spec int_part(binary(), index()) -> intermediate_ast().
   int_part(Input, Index) ->
       p(Input, Index, int_part,
  
positive.code:     p(Input, Index, comment,
        p_seq([p_string(";"),
               p_zero_or_more(p_charclass(<<"[^\n\r]">>)),
               fun eol/2])).
  
  -spec ignorable(binary(), index()) -> intermediate_ast().
  ignorable(Input, Index) ->
  
negative.code:                                                        fun list/2])])),
                         fun ignorable/2,
                         p_string(<<">>">>)]),
                  fun string/2,
                  p_seq([p_string(<<"<<">>),
                         fun ignorable/2,
                         p_string(<<">>">>)])]),
  