From 878bcb9277d347ecbd65466a843fbf2099909c33 Mon Sep 17 00:00:00 2001
From: Aaron Yue <haoxuany@fb.com>
Date: Wed, 4 Apr 2018 10:24:53 -0700
Subject: [PATCH] Show input for ambiguous parse failures

Summary: show the input that an ambiguous parse is failing at

Reviewed By: patapizza

Differential Revision: D7502191

fbshipit-source-id: 9f0fbf8301413d9007236ba5b6af1f4b41c20269
---
 tests/Duckling/Testing/Asserts.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/Duckling/Testing/Asserts.hs b/tests/Duckling/Testing/Asserts.hs
index ac6dc6ac..cddc3857 100644
--- a/tests/Duckling/Testing/Asserts.hs
+++ b/tests/Duckling/Testing/Asserts.hs
@@ -77,7 +77,7 @@ makeCorpusTest targets (context, options, xs) = testCase "Corpus Tests" $
         [token] -> assertBool ("don't pass predicate on " ++ show input) $
           predicate context token
         _ -> assertFailure $ show (length fullRangeTokens)
-          ++ " different ambiguous parses"
+          ++ " different ambiguous parses on " ++ show input
 
 
 makeNegativeCorpusTest :: [Some Dimension] -> NegativeCorpus -> TestTree