Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/Pure/Isar/rule_insts.ML
changeset 28083 103d9282a946
parent 27882 eaa9fef9f4c1
child 28965 1de908189869 
--- a/src/Pure/Isar/rule_insts.ML	Tue Sep 02 14:10:32 2008 +0200
+++ b/src/Pure/Isar/rule_insts.ML	Tue Sep 02 14:10:45 2008 +0200
@@ -284,7 +284,7 @@
         val (param_names, ctxt') = ctxt
           |> Variable.declare_thm thm
           |> Thm.fold_terms Variable.declare_constraints st
-          |> ProofContext.add_fixes_i (map (fn (x, T) => (x, SOME T, NoSyn)) params);
+          |> ProofContext.add_fixes_i (map (fn (x, T) => (Name.binding x, SOME T, NoSyn)) params);
 
         (* Process type insts: Tinsts_env *)
         fun absent xi = error
isabelle