--- a/src/Pure/display.ML Thu Apr 22 10:52:32 2004 +0200
+++ b/src/Pure/display.ML Thu Apr 22 10:55:02 2004 +0200
@@ -224,7 +224,7 @@
fun prt_axm (a, t) = Pretty.block [Pretty.str (a ^ ":"), Pretty.brk 1, prt_term t];
- val {self = _, tsig, const_tab, syn = _, path, spaces, data} = Sign.rep_sg sg;
+ val {self = _, tsig, const_tab, path, spaces, data} = Sign.rep_sg sg;
val {axioms, oracles, ...} = Theory.rep_theory thy;
val spaces' = Library.sort_wrt fst spaces;
val {classes, classrel, default, tycons = type_tab, log_types, univ_witness, abbrs, arities} =