aboutsummaryrefslogtreecommitdiffhomepage
path: root/hol-light/pg_tactics.ml
diff options
context:
space:
mode:
Diffstat (limited to 'hol-light/pg_tactics.ml')
-rw-r--r--hol-light/pg_tactics.ml7
1 files changed, 4 insertions, 3 deletions
diff --git a/hol-light/pg_tactics.ml b/hol-light/pg_tactics.ml
index de6132a9..2943f461 100644
--- a/hol-light/pg_tactics.ml
+++ b/hol-light/pg_tactics.ml
@@ -314,12 +314,13 @@ let pg_kill() =
let n = length (!the_current_xgoalstack) in
(dec_pg_global_state n;
the_current_xgoalstack := [];
- print_string "*** Proof aborted.");;
+ print_string "*** Proof aborted.\n");;
-let pg_forget s = ();; (* TODO *)
+let pg_forget s =
+ print_string ("*** Remove theorem "^s^"\n");;
let pg_restart() =
- print_string "*** Session restarted.";;
+ print_string "*** Session restarted.\n";;
(* ------------------------------------------------------------------------- *)
(* Configure the annotated prompt. *)