src/HOL/Library/code_test.ML
changeset 80328 559909bd7715
parent 78728 72631efa3821
child 81870 a4c0f9d12440
--- a/src/HOL/Library/code_test.ML	Mon Jun 10 14:04:52 2024 +0200
+++ b/src/HOL/Library/code_test.ML	Mon Jun 10 14:05:39 2024 +0200
@@ -131,7 +131,7 @@
     pretty_eval ctxt evals eval_ts)
 
 fun pretty_failures ctxt target failures =
-  Pretty.blk (0, Pretty.fbreaks (map (pretty_failure ctxt target) failures))
+  Pretty.block0 (Pretty.fbreaks (map (pretty_failure ctxt target) failures))
 
 
 (* driver invocation *)