From 60a29ffea0b596ae19b3a5bafbcc47bfec50b3b9 Mon Sep 17 00:00:00 2001 From: Thien-Thi Nguyen Date: Thu, 23 Aug 2012 18:17:08 +0200 Subject: [PATCH] libguile: Fix bug: Don't expect 'send' string to be writable Expecting writable strings fails if the string is the result of 'symbol->string', for example. * libguile/socket.c (scm_send): Use 'scm_i_string_chars'. --- libguile/socket.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/libguile/socket.c b/libguile/socket.c index ddc9b0ab0..964f72c45 100644 --- a/libguile/socket.c +++ b/libguile/socket.c @@ -1482,7 +1482,7 @@ SCM_DEFINE (scm_send, "send", 2, 1, 0, fd = SCM_FPORT_FDES (sock); len = scm_i_string_length (message); - src = scm_i_string_writable_chars (message); + src = scm_i_string_chars (message); SCM_SYSCALL (rv = send (fd, src, len, flg)); scm_i_string_stop_writing ();