Skip to content
Snippets Groups Projects
Commit 45cb0b31 authored by Michele Alberti's avatar Michele Alberti
Browse files

[SAVer] Rename module.

parent 33e944d4
No related branches found
No related tags found
No related merge requests found
File moved
...@@ -24,8 +24,8 @@ open Why3 ...@@ -24,8 +24,8 @@ open Why3
type answer = { type answer = {
prover_answer : Call_provers.prover_answer; prover_answer : Call_provers.prover_answer;
nb_total : int; (* Total number of data points. *) nb_total : int; (** Total number of data points. *)
nb_proved : int; (* Number of data points verifying the property. *) nb_proved : int; (** Number of data points verifying the property. *)
} }
val call : val call :
......
...@@ -74,7 +74,7 @@ let answer_saver limit config env config_prover dataset_csv task = ...@@ -74,7 +74,7 @@ let answer_saver limit config env config_prover dataset_csv task =
| None -> invalid_arg "No dataset provided for SAVer" | None -> invalid_arg "No dataset provided for SAVer"
| Some filename -> filename | Some filename -> filename
in in
let answer = Saver.call limit config env config_prover ~dataset task in let answer = SAVer.call limit config env config_prover ~dataset task in
let prover_answer = answer.prover_answer in let prover_answer = answer.prover_answer in
let additional_info = Fmt.str "(%d/%d)" answer.nb_proved answer.nb_total in let additional_info = Fmt.str "(%d/%d)" answer.nb_proved answer.nb_total in
(prover_answer, Some additional_info) (prover_answer, Some additional_info)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment