changeset 58893 | 9e0ecb66d6a7 |
parent 58059 | 4e477dcd050a |
child 59936 | b8ffc3dc9e24 |
--- a/src/HOL/Library/Old_SMT/old_smt_config.ML Mon Nov 03 14:31:15 2014 +0100 +++ b/src/HOL/Library/Old_SMT/old_smt_config.ML Mon Nov 03 14:50:27 2014 +0100 @@ -246,7 +246,7 @@ end val _ = - Outer_Syntax.improper_command @{command_spec "old_smt_status"} + Outer_Syntax.command @{command_spec "old_smt_status"} "show the available SMT solvers, the currently selected SMT solver, \ \and the values of SMT configuration options" (Scan.succeed (Toplevel.keep (print_setup o Toplevel.context_of)))