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.
inter_sort: keep normal!
authorwenzelm
Fri, 07 Jul 2000 21:51:52 +0200
changeset 9281 a48818595670
parent 9280 78a9bca983ac
child 9282 0181ac100520
inter_sort: keep normal!
src/Pure/sorts.ML file | annotate | diff | comparison | revisions 
--- a/src/Pure/sorts.ML	Fri Jul 07 18:29:34 2000 +0200
+++ b/src/Pure/sorts.ML	Fri Jul 07 21:51:52 2000 +0200
@@ -130,7 +130,7 @@
   in intr S end;
 
 (*instersect sorts (preserves minimality)*)
-fun inter_sort classrel = foldr (inter_class classrel);
+fun inter_sort classrel = sort_strings o foldr (inter_class classrel);
isabelle