mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

* socket.c (scm_recvfrom): Added missing semicolon.

Browse source
This commit is contained in:
Mikael Djurfeldt 1997-01-07 13:08:17 +00:00
parent 251ca7ab83
commit 239294dafd
2 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/ChangeLog
View file

@ -1,3 +1,7 @@
Tue Jan 7 15:04:06 1997 Mikael Djurfeldt <mdj@kenneth>
* socket.c (scm_recvfrom): Added missing semicolon.
Mon Jan 6 20:39:08 1997 Gary Houston <ghouston@actrix.gen.nz> Mon Jan 6 20:39:08 1997 Gary Houston <ghouston@actrix.gen.nz>
* socket.c (scm_recvfrom): allow buff_or_size to be a list containing * socket.c (scm_recvfrom): allow buff_or_size to be a list containing

2
libguile/socket.c
View file

@ -690,7 +690,7 @@ scm_recvfrom (sock, buff_or_size, flags)
if (start > end) if (start > end)
scm_out_of_range (s_recvfrom, s_start); scm_out_of_range (s_recvfrom, s_start);
c_buf = SCM_CHARS (tok_buf) + start; c_buf = SCM_CHARS (tok_buf) + start;
size = end - start size = end - start;
} }
else { else {
SCM_ASSERT (SCM_STRINGP (buff_or_size), buff_or_size, SCM_ARG2, SCM_ASSERT (SCM_STRINGP (buff_or_size), buff_or_size, SCM_ARG2,