Mercurial Mercurial > hg > nominal2 / 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.
Nominal/nominal_function.ML
changeset 2999 68c894c513f6
parent 2992 782a2cd1a8d0
child 3045 d0ad264f8c4f 
--- a/Nominal/nominal_function.ML	Fri Aug 19 12:49:38 2011 +0900
+++ b/Nominal/nominal_function.ML	Sun Aug 28 14:50:13 2011 +0100
@@ -256,7 +256,7 @@
 (* outer syntax *)
 
 local
-  val option_parser = Parse.group "option"
+  val option_parser = Parse.group (fn () => "option")
     ((Parse.reserved "sequential" >> K Sequential)
      || ((Parse.reserved "default" |-- Parse.term) >> Default)
      || (Parse.reserved "domintros" >> K DomIntros)
nominal2