tuned spaces;
authorwenzelm
Sun, 10 Feb 2008 20:49:48 +0100
changeset 26054 345e495d3b92
parent 26053 f8ee5cbb3068
child 26055 a7a537e0413a
tuned spaces;
src/Pure/Isar/theory_target.ML
--- a/src/Pure/Isar/theory_target.ML	Sun Feb 10 20:49:47 2008 +0100
+++ b/src/Pure/Isar/theory_target.ML	Sun Feb 10 20:49:48 2008 +0100
@@ -207,7 +207,7 @@
 
 fun declare_const (ta as Target {target, is_locale, is_class, ...}) depends ((c, T), mx) lthy =
   let
-  val pos = Position.properties_of (Position.thread_data ());
+    val pos = Position.properties_of (Position.thread_data ());
     val xs = filter depends (#1 (ProofContext.inferred_fixes (LocalTheory.target_of lthy)));
     val U = map #2 xs ---> T;
     val (mx1, mx2, mx3) = fork_mixfix ta mx;