anchor.diff:  %%
   %% %CopyrightBegin%
   %%
  -%% Copyright Ericsson AB 2001-2015. All Rights Reserved.
  +%% Copyright Ericsson AB 2001-2016. All Rights Reserved.
   %%
   %% Licensed under the Apache License, Version 2.0 (the "License");
   %% you may not use this file except in compliance with the License.
  
positive.code: 			 true ->
  			     case split(Marker0, "-") of
  				 [Func,Arity] ->
  				     Func++"/"++Arity;
  				 _ ->
  				     Marker0
  			     end
  
negative.code:     [t_utype_elem(K) ++ " => " ++ t_utype_elem(V)].
  
  t_abstype(Es) ->
      Name = t_name(get_elem(erlangName, Es)),
      [Name, "("] ++ seq(fun t_utype_elem/1, get_elem(type, Es), [")"]).
  
  t_union(Es) ->
      seq(fun t_utype_elem/1, Es, " | ", []).
  