From 794b248d0afb9ae7eae1bc0d8f6498a903e02e23 Mon Sep 17 00:00:00 2001 From: Ben Sima Date: Wed, 27 Mar 2019 23:07:51 -0700 Subject: bs: formatting --- lore/Language/Bs/Expr.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lore/Language/Bs/Expr.hs') diff --git a/lore/Language/Bs/Expr.hs b/lore/Language/Bs/Expr.hs index d386d0e..a39c7b6 100644 --- a/lore/Language/Bs/Expr.hs +++ b/lore/Language/Bs/Expr.hs @@ -128,8 +128,9 @@ instance Pretty LispErrorType where textStrict "bad special form:" <$$> textStrict txt - NotFunction _ -> + NotFunction expr -> textStrict "not a function" + <$$> pretty expr UnboundVar txt -> textStrict "unbound variable:" -- cgit v1.2.3