From f7abaf07fab2d3e76b7ac3bbad53f177a29f63d6 Mon Sep 17 00:00:00 2001
From: Ulf Norell <ulf.norell@gmail.com>
Date: Mon, 16 Dec 2019 14:07:16 +0100
Subject: [PATCH] Add list comprehension match to test case

---
 test/contracts/let_patterns.aes | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/test/contracts/let_patterns.aes b/test/contracts/let_patterns.aes
index 3a2590e..9ba1ba6 100644
--- a/test/contracts/let_patterns.aes
+++ b/test/contracts/let_patterns.aes
@@ -11,3 +11,5 @@ contract LetPatterns =
     let {x = i, y = j} = r
     x + a + b + n + i + j
 
+  entrypoint lc(xs : list(option(int))) : list(int) =
+    [ x | Some(x) <- xs ]