From b33e1fc80bb0e7191c1ea3378569ed8c0fe4af6d Mon Sep 17 00:00:00 2001
From: Nadrieril
Date: Mon, 11 Nov 2019 18:20:52 +0000
Subject: Add more detail to TypeMismatch error

---
 dhall/tests/type-errors/unit/NaturalSubtractNotNatural.txt | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'dhall/tests/type-errors/unit/NaturalSubtractNotNatural.txt')

diff --git a/dhall/tests/type-errors/unit/NaturalSubtractNotNatural.txt b/dhall/tests/type-errors/unit/NaturalSubtractNotNatural.txt
index fd906bf..02a9c45 100644
--- a/dhall/tests/type-errors/unit/NaturalSubtractNotNatural.txt
+++ b/dhall/tests/type-errors/unit/NaturalSubtractNotNatural.txt
@@ -4,3 +4,10 @@
   | ^--------------^
   |
   = Type error: Wrong type of function argument
+ --> 1:18
+  |
+1 | Natural/subtract True True␊
+  |                  ^--^
+  |
+  = This argument has type Value@WHNF { value: AppliedBuiltin(Bool, []), type: Type }
+[unknown location] But the function expected an argument of type Value@WHNF { value: AppliedBuiltin(Natural, []), type: Type }
-- 
cgit v1.2.3