summaryrefslogtreecommitdiff
path: root/libguile/socket.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-09-22 17:17:55 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-09-22 17:17:55 +0000
commit86c991c2a202c1d06caa5f01ec5d36a07a19bb96 (patch)
treede2cbc86a2935e2026ffa9deec7cbd564f0d688d /libguile/socket.c
parentc1aef037101d36e33de853041e407593cf32a489 (diff)
downloadguile-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.c4
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));