more tweaks to pretty printing.

2024-11-15 19:13:42 -08:00
parent 9faee86886
commit 9767d92952
7 changed files with 39 additions and 24 deletions
--- a/src/Lib/Eval.idr
+++ b/src/Lib/Eval.idr
@@ -204,7 +204,7 @@ nfv env t = quote (length env) !(eval env CBV t)

 export
 prvalCtx : {auto ctx : Context} -> Val -> M String
-prvalCtx v = pure $ pprint (toList $ map fst ctx.types) !(quote ctx.lvl v)
+prvalCtx v = pure $ interpolate $ pprint (toList $ map fst ctx.types) !(quote ctx.lvl v)

 -- REVIEW - might be easier if we inserted the meta without a bunch of explicit App
 -- I believe Kovacs is doing that.