anchor.diff:  
     {comments, ""}.
   
  -keyword(Config) when is_list(Config) ->
  -  keyword(fun read/1),
  -  keyword(fun read_io/1);
  -keyword(ReadFun) ->
  +keyword(Config) ->
  +  ReadFun = ?config(read_fun, Config),
  +
     FooSym   = clj_rt:symbol(<<"foo">>),
     FooNs    = 'clojerl.Namespace':find_or_create(FooSym),
     SomeSym  = clj_rt:symbol(<<"some">>),
  
positive.code: 
    {comments, ""}.
  
  erl_binary(Config) when is_list(Config) ->
    erl_binary(fun read/1),
    erl_binary(fun read_io/1);
  erl_binary(ReadFun) ->
    ErlBinarySym = clj_rt:symbol(<<"erl-binary*">>),
    EmptyBinary  = clj_rt:list([ErlBinarySym]),
  
  
negative.code: 
    {comments, ""}.
  
  regex(Config) ->
    ReadFun = ?config(read_fun, Config),
    ReadAllFun = ?config(read_all_fun, Config),
  
    Regex1 = 'erlang.util.Regex':?CONSTRUCTOR(<<".?el\\.lo">>),
    Regex1 = ReadFun(<<"#\".?el\\.lo\"">>),
  
  