anchor.diff:  gen_decode_partial_incomplete(#gen{}) ->
       ok.
   
  -gen_partial_inc_dispatcher() ->
  +gen_partial_inc_dispatcher(#gen{erule=ber}) ->
       case {asn1ct:read_config_data(partial_incomplete_decode),
   	  asn1ct:get_gen_state_field(inc_type_pattern)} of
   	{undefined,_} ->
  
positive.code: 	       false -> "Data"
  	   end,
  
      emit(["decode(Type,",Data,") ->",nl]),
      DecWrap =
  	case {Gen,ReturnRest} of
  	    {#gen{erule=ber},false} ->
  
negative.code: gen_partial_inc_dispatcher([], _, _) ->
      emit([".",nl]).
  
  gen_dispatcher(L, DispFunc, Prefix) ->
      gen_dispatcher_1(L, DispFunc, Prefix),
      emit([DispFunc,"(","Type",", _Data) ->"
            " exit({error,{asn1,{undefined_type,Type}}}).",nl,nl]).
  
  gen_dispatcher_1([F|T], FuncName, Prefix) ->
      Func = list_to_atom(lists:concat([Prefix,F])),
      emit([FuncName,"(",{asis,F},", Data) -> ",
            {asis,Func},"(Data)",";",nl]),
      gen_dispatcher_1(T, FuncName, Prefix);
  gen_dispatcher_1([], _, _) ->
      ok.
  
  pgen_info() ->
      emit(["info() ->",nl,
  