expect-5.45-re-memleak.patch

   1 diff -up expect5.45/expect.c.orig expect5.45/expect.c
   2 --- expect5.45/expect.c.orig    2013-10-02 13:16:31.462430482 +0200
   3 +++ expect5.45/expect.c 2013-10-02 13:17:18.420599495 +0200
   4 @@ -185,9 +185,9 @@ free_ecase(
   5  {
   6      if (ec->i_list->duration == EXP_PERMANENT) {
   7         if (ec->pat)  { Tcl_DecrRefCount(ec->pat); }
   8 -       if (ec->gate) { Tcl_DecrRefCount(ec->gate); }
   9         if (ec->body) { Tcl_DecrRefCount(ec->body); }
  10      }
  11 +    if (ec->gate) { Tcl_DecrRefCount(ec->gate); }
  12
  13      if (free_ilist) {
  14         ec->i_list->ecount--;