src/Pure/goal_display.ML
changeset 76082 1202e29798a4
parent 70443 a21a96eda033
child 76083 8d6cb72aa511
--- a/src/Pure/goal_display.ML	Thu Sep 08 12:43:40 2022 +0200
+++ b/src/Pure/goal_display.ML	Thu Sep 08 12:52:41 2022 +0200
@@ -93,7 +93,7 @@
       Pretty.markup (Markup.subgoal s) [Pretty.str (" " ^ s ^ ". "), prt_term A];
     val pretty_subgoals = map_index (fn (i, A) => pretty_subgoal (string_of_int (i + 1)) A);
 
-    val pretty_ffpairs = pretty_list "flex-flex pairs:" (Syntax.pretty_flexpair ctxt);
+    val pretty_ffpairs = pretty_list "flex-flex pairs:" (Pretty.block o Syntax.pretty_flexpair ctxt);
 
     val pretty_consts = pretty_list "constants:" prt_consts o consts_of;
     val pretty_vars = pretty_list "variables:" prt_vars o vars_of;