summaryrefslogtreecommitdiff
path: root/libguile/net_db.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-04-10 07:57:05 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-04-10 07:57:05 +0000
commite4b265d817c6758441bbfc66730cae98eabde9b5 (patch)
tree401f2628ddf4bcab2a6c72023daba0c8b0aa03eb /libguile/net_db.c
parent40f83c3e1b5cb1d440f785d857981417c5fa6f85 (diff)
downloadguile-e4b265d817c6758441bbfc66730cae98eabde9b5.tar.gz
* Avoid redundant casting of argument numbers to char* and vice versa.
Diffstat (limited to 'libguile/net_db.c')
-rw-r--r--libguile/net_db.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/libguile/net_db.c b/libguile/net_db.c
index 2ef227f48..183a01f76 100644
--- a/libguile/net_db.c
+++ b/libguile/net_db.c
@@ -1,5 +1,5 @@
/* "net_db.c" network database support
- * Copyright (C) 1995, 96, 97, 98, 99, 2000, 2001 Free Software Foundation, Inc.
+ * Copyright (C) 1995,1996,1997,1998,1999,2000,2001 Free Software Foundation, Inc.
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
@@ -119,7 +119,7 @@ SCM_DEFINE (scm_inet_ntoa, "inet-ntoa", 1, 0, 0,
struct in_addr addr;
char *s;
SCM answer;
- addr.s_addr = htonl (SCM_NUM2ULONG (1,inetid));
+ addr.s_addr = htonl (SCM_NUM2ULONG (1, inetid));
s = inet_ntoa (addr);
answer = scm_makfromstr (s, strlen (s), 0);
return answer;
@@ -137,7 +137,7 @@ SCM_DEFINE (scm_inet_netof, "inet-netof", 1, 0, 0,
#define FUNC_NAME s_scm_inet_netof
{
struct in_addr addr;
- addr.s_addr = htonl (SCM_NUM2ULONG (1,address));
+ addr.s_addr = htonl (SCM_NUM2ULONG (1, address));
return scm_ulong2num ((unsigned long) inet_netof (addr));
}
#undef FUNC_NAME
@@ -154,7 +154,7 @@ SCM_DEFINE (scm_lnaof, "inet-lnaof", 1, 0, 0,
#define FUNC_NAME s_scm_lnaof
{
struct in_addr addr;
- addr.s_addr = htonl (SCM_NUM2ULONG (1,address));
+ addr.s_addr = htonl (SCM_NUM2ULONG (1, address));
return scm_ulong2num ((unsigned long) inet_lnaof (addr));
}
#undef FUNC_NAME
@@ -288,7 +288,7 @@ SCM_DEFINE (scm_gethost, "gethost", 0, 1, 0,
}
else
{
- inad.s_addr = htonl (SCM_NUM2ULONG (1,host));
+ inad.s_addr = htonl (SCM_NUM2ULONG (1, host));
entry = gethostbyaddr ((char *) &inad, sizeof (inad), AF_INET);
}
if (!entry)
@@ -412,7 +412,7 @@ SCM_DEFINE (scm_getproto, "getproto", 0, 1, 0,
else
{
unsigned long protonum;
- protonum = SCM_NUM2ULONG (1,protocol);
+ protonum = SCM_NUM2ULONG (1, protocol);
entry = getprotobynumber (protonum);
}
if (!entry)