From fcc367c122661884bb0f868bd3c19b06988ec213 Mon Sep 17 00:00:00 2001
From: CoprDistGit <infra@openeuler.org>
Date: Thu, 1 Aug 2024 13:58:07 +0000
Subject: automatic import of expect

---
 expect-5.45-re-memleak.patch | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 expect-5.45-re-memleak.patch

(limited to 'expect-5.45-re-memleak.patch')

diff --git a/expect-5.45-re-memleak.patch b/expect-5.45-re-memleak.patch
new file mode 100644
index 0000000..182f596
--- /dev/null
+++ b/expect-5.45-re-memleak.patch
@@ -0,0 +1,14 @@
+diff -up expect5.45/expect.c.orig expect5.45/expect.c
+--- expect5.45/expect.c.orig	2013-10-02 13:16:31.462430482 +0200
++++ expect5.45/expect.c	2013-10-02 13:17:18.420599495 +0200
+@@ -185,9 +185,9 @@ free_ecase(
+ {
+     if (ec->i_list->duration == EXP_PERMANENT) {
+ 	if (ec->pat)  { Tcl_DecrRefCount(ec->pat); }
+-	if (ec->gate) { Tcl_DecrRefCount(ec->gate); }
+ 	if (ec->body) { Tcl_DecrRefCount(ec->body); }
+     }
++    if (ec->gate) { Tcl_DecrRefCount(ec->gate); }
+ 
+     if (free_ilist) {
+ 	ec->i_list->ecount--;
-- 
cgit v1.2.3