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/display.ML
changeset 17468 7c040a5fd171
parent 17447 3a23acfdf5ba
child 17475 d008d04068a1 
--- a/src/Pure/display.ML	Sat Sep 17 18:11:27 2005 +0200
+++ b/src/Pure/display.ML	Sat Sep 17 18:11:28 2005 +0200
@@ -76,7 +76,7 @@
     val q = if quote then Pretty.quote else I;
     val prt_term = q o (Pretty.term pp);
 
-    val hyps' = if ! show_hyps then hyps else fold (remove (op =)) asms hyps;
+    val hyps' = if ! show_hyps then hyps else fold (remove (op aconv)) asms hyps;
     val hlen = length xshyps + length hyps' + length tpairs;
     val hsymbs =
       if hlen = 0 andalso not ora then []
isabelle