diff options
author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2000-09-22 17:17:55 +0000 |
---|---|---|
committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2000-09-22 17:17:55 +0000 |
commit | 86c991c2a202c1d06caa5f01ec5d36a07a19bb96 (patch) | |
tree | de2cbc86a2935e2026ffa9deec7cbd564f0d688d /libguile/socket.c | |
parent | c1aef037101d36e33de853041e407593cf32a489 (diff) | |
download | guile-86c991c2a202c1d06caa5f01ec5d36a07a19bb96.tar.gz |
* Replaced SCM_CHARS with SCM_STRING_CHARS or SCM_SYMBOL_CHARS.
Diffstat (limited to 'libguile/socket.c')
-rw-r--r-- | libguile/socket.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/socket.c b/libguile/socket.c index 47166e1ca..7bbcd1e52 100644 --- a/libguile/socket.c +++ b/libguile/socket.c @@ -709,7 +709,7 @@ SCM_DEFINE (scm_recv, "recv!", 2, 1, 0, SCM_VALIDATE_INUM_DEF_COPY (3,flags,0,flg); fd = SCM_FPORT_FDES (sock); - SCM_SYSCALL (rv = recv (fd, SCM_CHARS (buf), SCM_LENGTH (buf), flg)); + SCM_SYSCALL (rv = recv (fd, SCM_STRING_CHARS (buf), SCM_LENGTH (buf), flg)); if (rv == -1) SCM_SYSERROR; @@ -807,7 +807,7 @@ SCM_DEFINE (scm_recvfrom, "recvfrom!", 2, 3, 0, fd = SCM_FPORT_FDES (sock); tmp_size = scm_addr_buffer_size; - SCM_SYSCALL (rv = recvfrom (fd, SCM_CHARS (buf) + offset, + SCM_SYSCALL (rv = recvfrom (fd, SCM_STRING_CHARS (buf) + offset, cend - offset, flg, (struct sockaddr *) scm_addr_buffer, &tmp_size)); |