summaryrefslogtreecommitdiff
path: root/libguile/socket.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-08-31 14:42:31 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-08-31 14:42:31 +0000
commit8c494e99736a68a24d3004652c6f4aceb16d7ecf (patch)
treede3e7d8e8f642aff57070fd12347af4d89c2a600 /libguile/socket.c
parentdee01b012cd5179b70a2e361ee08c364ed9f3314 (diff)
downloadguile-8c494e99736a68a24d3004652c6f4aceb16d7ecf.tar.gz
* Removed lots of deprecated stuff.
Diffstat (limited to 'libguile/socket.c')
-rw-r--r--libguile/socket.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/libguile/socket.c b/libguile/socket.c
index 9c22c215a..44539bce9 100644
--- a/libguile/socket.c
+++ b/libguile/socket.c
@@ -171,7 +171,6 @@ SCM_DEFINE (scm_inet_aton, "inet-aton", 1, 0, 0,
struct in_addr soka;
SCM_VALIDATE_STRING (1, address);
- SCM_STRING_COERCE_0TERMINATION_X (address);
if (inet_aton (SCM_STRING_CHARS (address), &soka) == 0)
SCM_MISC_ERROR ("bad address", SCM_EOL);
return scm_ulong2num (ntohl (soka.s_addr));