From 2a0ecfbef81231a394df71817a4cd9e81582b7de Mon Sep 17 00:00:00 2001
From: Son Ho
Date: Sun, 13 Nov 2022 23:02:00 +0100
Subject: Make minor modifications

---
 tests/coq/misc/External__Funs.v | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'tests/coq/misc/External__Funs.v')

diff --git a/tests/coq/misc/External__Funs.v b/tests/coq/misc/External__Funs.v
index 77b738b0..df35f7eb 100644
--- a/tests/coq/misc/External__Funs.v
+++ b/tests/coq/misc/External__Funs.v
@@ -84,8 +84,7 @@ Definition test_custom_swap_back
   result (state * (u32 * u32))
   :=
   p <- custom_swap_back u32 x y st (1 %u32) st0;
-  let (st1, tmp) := p in
-  let (x0, y0) := tmp in Return (st1, (x0, y0))
+  let (st1, (x0, y0)) := p in Return (st1, (x0, y0))
   .
 
 (** [external::test_swap_non_zero] *)
-- 
cgit v1.2.3