Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
Why3
why3
Commits
cf169474
Commit
cf169474
authored
Dec 08, 2010
by
François Bobot
Committed by
Bobot Francois
Dec 08, 2010
Browse files
use_api : transpose the api change
parent
31a4649f
Changes
1
Hide whitespace changes
Inline
Side-by-side
examples/use_api.ml
View file @
cf169474
...
...
@@ -52,7 +52,7 @@ let () = printf "@[task 1 created:@\n%a@]@." Pretty.print_task task1
let
result1
=
Driver
.
prove_task
~
command
:
alt_ergo
.
Whyconf
.
command
alt_ergo_driver
task1
()
alt_ergo_driver
task1
()
()
let
()
=
printf
"@[On task 1, alt-ergo answers %a@."
Call_provers
.
print_prover_result
result1
...
...
@@ -80,7 +80,7 @@ let () = printf "@[task 2 created:@\n%a@]@." Pretty.print_task task2
let
result2
=
Driver
.
prove_task
~
command
:
alt_ergo
.
Whyconf
.
command
alt_ergo_driver
task2
()
alt_ergo_driver
task2
()
()
let
()
=
printf
"@[On task 2, alt-ergo answers %a@."
Call_provers
.
print_prover_result
result2
...
...
@@ -116,7 +116,7 @@ let () = printf "@[task 3 created@]@."
let
result3
=
Driver
.
prove_task
~
command
:
alt_ergo
.
Whyconf
.
command
alt_ergo_driver
task3
()
alt_ergo_driver
task3
()
()
let
()
=
printf
"@[On task 3, alt-ergo answers %a@."
Call_provers
.
print_prover_result
result3
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment