anchor.diff:      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, "."),
  
positive.code:     {ok,Parsed} = erl_parse:parse_form(Scanned),
      Parsed.
  
  build(From, String) ->
      ModuleName = get_module_name(String),
      build_module(ModuleName, get_ast(From, 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),
  