summaryrefslogtreecommitdiff
path: root/lore/Language/Bs/Expr.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lore/Language/Bs/Expr.hs')
-rw-r--r--lore/Language/Bs/Expr.hs3
1 files changed, 2 insertions, 1 deletions
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:"