anchor.diff:      Fun = make_fun(FunName, 1, [ClauseS, ClauseF], LineNo2),
       {[Fun], LineNo2, Maps, FunNo + 1}.
   
  +-spec make_fun(atom(), pos_integer(), ast(), pos_integer()) -> expr().
   make_fun(FunName, Arity, Clause, LineNo) ->
       {function, LineNo, FunName, Arity, Clause}.
   
  
positive.code: -spec make_atom(atom(), pos_integer()) -> expr().
  make_atom(A, LineNo) when is_atom(A) -> {atom, LineNo, A}.
  
  -spec make_call(expr(), expr(), pos_integer()) -> expr().
  make_call(FnName, Args, LineNo) ->
      {call, LineNo, FnName, Args}.
  
  
negative.code: make_export_attr(LineNo) ->
      {{attribute, LineNo, export, [
  				  {validate,          1},
  				  {extract,           2},
  				  {get_partition_key, 2}
  				 ]}, LineNo + 1}.
  
  -ifdef(TEST).
  -compile(export_all).
  
  -define(VALID,   true).
  