let compute_calls_collection () =
  debug 
    "[Calls Collection] collectinfg potential by reference calls"
  debug 
    "[Calls Collection] computing parameters usage first"
  compute_parameters_usage ();
  if not !calls_collection_computed then 
    (Visitor.visitFramacFile (new calls_collection)(Ast.get());
     calls_collection_computed := true)