anchor.diff:      Ast = lists:map(fun(Line) -> matches(Line) end, get_tree(From, String)),
       module(get_module_name(String), Ast).
   
  +print_ast(From, String) ->
  +    io:format("~p~n", [get_ast(From, String)]).
  +
   get_code(Ast) ->
       {ok, _, Code} = compile:forms(Ast),
       Code.
  
positive.code:     {'fun', Line, match_fun_body(Patterns)};
  matches({fun_def, Line, Name, {fn, _Line, Patterns}}) ->
      function(Name, Line, get_function_arity(Patterns), match_function_body(Patterns));
  matches(Exp) -> {error, Exp}.
  
  matches_list([]) -> [];
  
negative.code:     Program = binary_to_list(Content),
      {ok, Tokens, _Endline} = lexer:string(Program),
      Tokens.
  
  print_lex(From, String) ->
      io:format("~p~n", [get_lex(From, String)]).
  
  get_module_name(String) ->
      [ModuleNameStr | _] = string:tokens(String, "."),
  