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:     Program = binary_to_list(Content),
      {ok, Tokens, _Endline} = lexer:string(Program),
      Tokens.
  
  get_module_name(String) ->
      [ModuleNameStr | _] = string:tokens(String, "."),
  
negative.code:     Tokens = get_lex(From, String),
      {ok, Tree} = parser:parse(Tokens),
      Tree.
  
  print_tree(From, String) ->
      io:format("~p~n", [get_tree(From, String)]).
  
  get_lex(string, String) ->
      {ok, Tokens, _Endline} = lexer:string(String),
  