let force_compute_all_calldeps ()=
  if Db.Value.is_computed () then
    Project.clear
      ~selection:(State_selection.Dynamic.with_dependencies Db.Value.self)
      ();
  !Db.Value.compute ()