Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
making SMLNJ happy
authorhaftmann
Tue, 28 Oct 2008 12:28:14 +0100
changeset 28701 ca5840b1f7b3
parent 28700 fb92b1d1b285
child 28702 4867f2fa0e48
making SMLNJ happy
src/Pure/Isar/expression.ML file | annotate | diff | comparison | revisions 
--- a/src/Pure/Isar/expression.ML	Tue Oct 28 11:05:44 2008 +0100
+++ b/src/Pure/Isar/expression.ML	Tue Oct 28 12:28:14 2008 +0100
@@ -85,7 +85,7 @@
    Sanity check of instantiations.
    Positional instantiations are extended to match full length of parameter list. *)
 
-fun parameters thy (expr, fixed) =
+fun parameters thy (expr, fixed : (Name.binding * string option * mixfix) list) =
   let
     fun reject_dups message xs =
       let val dups = duplicates (op =) xs
isabelle