anchor.diff:          false -> error
       end;
   
  +do_parse_config({list, Type}, Val) ->
  +    case is_list(Val) of
  +        true -> 
  +            do_parse_config_list(Val, Type, []);
  +        false -> 
  +            error
  +    end;
  +
   do_parse_config(proc, Val) ->
       case is_atom(Val) orelse is_pid(Val) of
           true -> {ok, Val};
  
positive.code: 
  % -compile([export_all]).
  % -define(TEST, 1).
  -ifdef(TEST).
  -include_lib("eunit/include/eunit.hrl").
  
  
negative.code:     throw({invalid_spec, Type}).
  
  
  %% @private
  do_parse_config_list([], _Type, Acc) ->
      {ok, lists:reverse(Acc)};
  
  do_parse_config_list([Term|Rest], Type, Acc) ->
      case do_parse_config(Type, Term) of
          {ok, Val} ->
              do_parse_config_list(Rest, Type, [Val|Acc]);
          error ->
              error
      end.
  
          
  
  %% ===================================================================
  %% EUnit tests
  %% ===================================================================
  