Affichage des subgoals

2022-05-10 14:44:07 +02:00 · 2022-05-10 14:44:07 +02:00 · dc29a93934
commit dc29a93934
parent 5774bab7d8
1 changed files with 3 additions and 0 deletions
--- a/main.ml
+++ b/main.ml
@ -84,6 +84,9 @@ while !subgoals <> [] do
        (* Affichage des sous-buts *)
        Printf.printf "================\n";
        Printf.printf "%s\n" (string_of_ty ty);
+        List.iter (fun (ty, _) ->
+            Printf.printf "%s\n" (string_of_ty ty)
+        ) !subgoals;

        (* Lecture d'une tactique *)
        Printf.printf "What do you want to do?\n"