# HG changeset patch
# User wenzelm
# Date 1194529891 -3600
# Node ID 7f2e3292e3dd2cce33b4ac8ee35a6ab345133213
# Parent  dd5b851f8ef028184ad7fa947bb0440acef3641c
renamed ProofContext.read_const' to ProofContext.read_const_proper;

diff -r dd5b851f8ef0 -r 7f2e3292e3dd src/Pure/ML/ml_context.ML
--- a/src/Pure/ML/ml_context.ML	Thu Nov 08 14:51:30 2007 +0100
+++ b/src/Pure/ML/ml_context.ML	Thu Nov 08 14:51:31 2007 +0100
@@ -241,7 +241,7 @@
 val _ = inline_antiq "type_syntax" (type_ true);
 
 fun const syn = (Scan.state >> Context.proof_of) -- Scan.lift Args.name >> (fn (ctxt, c) =>
-  #1 (Term.dest_Const (ProofContext.read_const' ctxt c))
+  #1 (Term.dest_Const (ProofContext.read_const_proper ctxt c))
   |> syn ? ProofContext.const_syntax_name ctxt
   |> ML_Syntax.print_string);