From 064563473346b3fd7c60cc170ed406af22c7ba7a Mon Sep 17 00:00:00 2001
From: Duncan Overbruck <mail@duncano.de>
Date: Wed, 5 Feb 2020 15:47:29 +0100
Subject: t/2000-mpick.t: check for double free with bindings

---
 t/2000-mpick.t | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

(limited to 't')

diff --git a/t/2000-mpick.t b/t/2000-mpick.t
index 802ea83..3cff87e 100755
--- a/t/2000-mpick.t
+++ b/t/2000-mpick.t
@@ -1,7 +1,7 @@
 #!/bin/sh -e
 cd ${0%/*}
 . ./lib.sh
-plan 26
+plan 27
 
 rm -rf test.dir
 mkdir test.dir
@@ -91,6 +91,15 @@ in
 !
 check_test 'let expression' -eq 2 'mlist inbox | mpick ./expr | wc -l'
 
+cat <<! >expr
+let foo = from.addr == "peter@example.org"
+let bar = from.disp == "Peter Example"
+# random comment
+in
+  foo && foo
+!
+check_test 'let expression double free' -eq 2 'mlist inbox | mpick ./expr | wc -l'
+
 cat <<! >expr
 let foo =
   let bar = from.disp == "Peter Example"
-- 
cgit 1.4.1