src/HOL/Library/Old_SMT/old_smt_config.ML
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)))