# HG changeset patch
# User wenzelm
# Date 1213905904 -7200
# Node ID def40a21176826be3a74b6c4025130c0a88aef1b
# Parent  2ddb6a2db65c94636c77b53e43fe0b450790dfbe
ProofContext.abbrev_mode;

diff -r 2ddb6a2db65c -r def40a211768 src/Pure/Isar/overloading.ML
--- a/src/Pure/Isar/overloading.ML	Thu Jun 19 22:05:01 2008 +0200
+++ b/src/Pure/Isar/overloading.ML	Thu Jun 19 22:05:04 2008 +0200
@@ -70,7 +70,7 @@
     val { primary_constraints, secondary_constraints, improve, subst,
       consider_abbrevs, passed, ... } = ImprovableSyntax.get ctxt;
     val tsig = (Sign.tsig_of o ProofContext.theory_of) ctxt;
-    val is_abbrev = consider_abbrevs andalso ProofContext.is_abbrev_mode ctxt;
+    val is_abbrev = consider_abbrevs andalso ProofContext.abbrev_mode ctxt;
     val passed_or_abbrev = passed orelse is_abbrev;
     fun accumulate_improvements (Const (c, ty)) = (case improve (c, ty)
          of SOME ty_ty' => Type.typ_match tsig ty_ty'