anchor.diff:  %Parse the function body
   
   toksFuncBody(return,{c_call, A, {B, C, Module}, {D, E, FunctionName}, Params})->
  -	%io:format("        call function ~s:~s(", [Module, FunctionName]),
  -	%io:format("~p)~n", [tupleList_getVars_3(Params)]);
  +    %io:format("        call function ~s:~s(", [Module, FunctionName]),
  +    %io:format("~p)~n", [tupleList_getVars_3(Params)]);
       esast:returnStatement(toksFuncBody(noreturn,{c_call, A, {B, C, Module}, {D, E, FunctionName}, Params}));
   
   %Detect primitive operations like addition & multiplication
  
positive.code:     % io:format("",[]);
      
  toksFuncBody(return,{c_case, _, Condition, Clauses})->
  	%io:format("        case statement:"),
  	%toksFuncBody(noreturn,Condition),
  	%lists:map(fun({c_clause,_,MatchVals,_true,Body})->toksFuncBody(return,Body) end,Clauses).
      io:format("",[]);
      
  toksFuncBody(_,T)->
  
negative.code: 
  %Read the module token (first token)
  toksModule({c_module, _A, {_, _, ModuleName}, Exports, _Attributes, Functions})->
      io:format("module: ~s ~n", [ModuleName]),
      io:format("    exports: ~p ~n", [tupleList_getVars_3(Exports)]),
      FormattedFunctions = toksFunctions(Functions),
      FormattedExports = lists:map(fun({N,A})->{atom_to_list(N),A} end,tupleList_getVars_3(Exports)),
      %io:format("~p~n~n~n~n~n~n", [FormattedFunctions]),
      esast:c_module(atom_to_list(ModuleName),FormattedExports,FormattedFunctions);
      
      
  toksModule(T)->
      io:format("Unrecognised Token in module section: ~p", [T]).
  
  
  
  