src/HOL/Tools/Sledgehammer/sledgehammer_isar.ML
changeset 49323 89674e5a4d35
parent 49317 6cf5e58f1185
child 49329 ee33ba3c0e05
     1.1 --- a/src/HOL/Tools/Sledgehammer/sledgehammer_isar.ML	Wed Jul 18 08:44:04 2012 +0200
     1.2 +++ b/src/HOL/Tools/Sledgehammer/sledgehammer_isar.ML	Wed Jul 18 08:44:04 2012 +0200
     1.3 @@ -36,8 +36,7 @@
     1.4  val running_proversN = "running_provers"
     1.5  val kill_proversN = "kill_provers"
     1.6  val refresh_tptpN = "refresh_tptp"
     1.7 -val mash_resetN = "mash_reset"
     1.8 -val mash_learnN = "mash_learn"
     1.9 +val reset_mashN = "reset_mash"
    1.10  
    1.11  val auto = Unsynchronized.ref false
    1.12  
    1.13 @@ -377,10 +376,8 @@
    1.14        kill_provers ()
    1.15      else if subcommand = refresh_tptpN then
    1.16        refresh_systems_on_tptp ()
    1.17 -    else if subcommand = mash_resetN then
    1.18 -      mash_reset ()
    1.19 -    else if subcommand = mash_learnN then
    1.20 -      () (* TODO: implement *)
    1.21 +    else if subcommand = reset_mashN then
    1.22 +      mash_reset ctxt
    1.23      else
    1.24        error ("Unknown subcommand: " ^ quote subcommand ^ ".")
    1.25    end