src/HOL/ex/Commands.thy
changeset 67096 e77f13a6a501
parent 59936 b8ffc3dc9e24
child 69597 ff784d5a5bfb
     1.1 --- a/src/HOL/ex/Commands.thy	Mon Nov 27 11:40:41 2017 +0100
     1.2 +++ b/src/HOL/ex/Commands.thy	Mon Nov 27 11:45:20 2017 +0100
     1.3 @@ -20,7 +20,8 @@
     1.4        let
     1.5          val ctxt = Toplevel.context_of st;
     1.6          val t = Syntax.read_term ctxt s;
     1.7 -      in Pretty.writeln (Syntax.pretty_term ctxt t) end)));
     1.8 +        val ctxt' = Variable.auto_fixes t ctxt;
     1.9 +      in Pretty.writeln (Syntax.pretty_term ctxt' t) end)));
    1.10  \<close>
    1.11  
    1.12  print_test x