[Pdg] Use the new Eva API

src/plugins/pdg/build.ml

@@ -1000,7 +1000,7 @@ let degenerated top kf =
   if top then PdgTypes.Pdg.top kf else PdgTypes.Pdg.bottom kf
 
 let compute_pdg kf =
-  if not (Db.Value.is_computed ()) then !Db.Value.compute ();
+  if not (Eva.Analysis.is_computed ()) then Eva.Analysis.compute ();
   Pdg_parameters.feedback "computing for function %a" Kernel_function.pretty kf;
   try
     if is_variadic kf then

src/plugins/pdg/register.ml

@@ -127,7 +127,7 @@ let compute_for_kf kf =
   Kernel_function.Set.mem kf (Pdg_parameters.BuildFct.get ())
 
 let compute () =
-  !Db.Value.compute ();
+  Eva.Analysis.compute ();
   let do_kf_pdg kf =
     if compute_for_kf kf then
       let pdg = !Db.Pdg.get kf in