summaryrefslogtreecommitdiff
path: root/libguile/net_db.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/net_db.c')
-rw-r--r--libguile/net_db.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/net_db.c b/libguile/net_db.c
index bbd21d86d..9cdf52ba3 100644
--- a/libguile/net_db.c
+++ b/libguile/net_db.c
@@ -175,8 +175,8 @@ with the local-address-within-network number @var{lna}.
unsigned long netnum;
unsigned long lnanum;
- SCM_VALIDATE_INT_COPY(1,net,netnum);
- SCM_VALIDATE_INT_COPY(2,lna,lnanum);
+ SCM_VALIDATE_INUM_COPY(1,net,netnum);
+ SCM_VALIDATE_INUM_COPY(2,lna,lnanum);
addr = inet_makeaddr (netnum, lnanum);
return scm_ulong2num (ntohl (addr.s_addr));
}
@@ -475,7 +475,7 @@ as its first argument; if given no arguments, it behaves like
}
else
{
- SCM_VALIDATE_INT(1,name);
+ SCM_VALIDATE_INUM(1,name);
entry = getservbyport (htons (SCM_INUM (name)), SCM_ROCHARS (proto));
}
if (!entry)