--- regex-posix.c.~1.62.~ 2003-04-07 08:05:25.000000000 +1000 +++ regex-posix.c 2004-07-04 18:56:03.000000000 +1000 @@ -1,4 +1,4 @@ -/* Copyright (C) 1997, 1998, 1999, 2000, 2001 Free Software Foundation, Inc. +/* Copyright (C) 1997, 1998, 1999, 2000, 2001, 2004 Free Software Foundation, Inc. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public @@ -188,6 +188,7 @@ cflags & ~REG_NOSUB); if (status != 0) { + scm_gc_free (rx, sizeof(regex_t), "regex"); scm_error (scm_regexp_error_key, FUNC_NAME, scm_regexp_error_msg (status, rx),