From 0290ddc5c456681ba1a28c44dc988aadb6daddb3 Mon Sep 17 00:00:00 2001
From: Brian Cully <bjc@kublai.com>
Date: Sun, 12 Nov 2017 19:40:18 -0500
Subject: Dump matcher on timeout.

---
 xmpt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/xmpt b/xmpt
index a43c037..19451f2 100755
--- a/xmpt
+++ b/xmpt
@@ -215,7 +215,7 @@ sub do_recv {
   local $SIG{ALRM} = sub {
     my $b = $readbuf;
     chomp $b;
-    die "Timed out waiting for match in $name step. Current read buffer:\n$b\n";
+    die "Timed out waiting for match in $name step. Current read buffer:\n$b\nMatcher:\n$re\n";
   };
   local $SIG{PIPE} = sub {
     die "SIGPIPE received from '@ARGV' while matching in $name step.\n";
-- 
cgit v1.2.3