1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-14 23:50:19 +02:00

* socket.c (scm_bind): free soka after use.

* stime.c (tzvar): new variable.
	(setzone, restorezone, scm_localtime, scm_mktime, scm_strftime):
	avoid memory leaks when allocating.
This commit is contained in:
Gary Houston 1998-01-04 02:50:12 +00:00
parent 7a35faf841
commit ef9ff3fd0a
3 changed files with 74 additions and 59 deletions

View file

@ -425,6 +425,7 @@ scm_bind (sock, fam, address, args)
rv = bind (fd, soka, size);
if (rv == -1)
scm_syserror (s_bind);
scm_must_free ((char *) soka);
return SCM_UNSPECIFIED;
}