summaryrefslogtreecommitdiffstats
path: root/otherlibs/unix/getserv.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/unix/getserv.c')
-rw-r--r--otherlibs/unix/getserv.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/unix/getserv.c b/otherlibs/unix/getserv.c
index 998a8ac5b..6cb976ac1 100644
--- a/otherlibs/unix/getserv.c
+++ b/otherlibs/unix/getserv.c
@@ -5,7 +5,7 @@
/* Xavier Leroy, projet Cristal, INRIA Rocquencourt */
/* */
/* Copyright 1996 Institut National de Recherche en Informatique et */
-/* Automatique. Distributed only by permission. */
+/* en Automatique. Distributed only by permission. */
/* */
/***********************************************************************/
@@ -38,7 +38,7 @@ static value alloc_service_entry(struct servent *entry)
name = copy_string(entry->s_name);
aliases = copy_string_array(entry->s_aliases);
proto = copy_string(entry->s_proto);
- res = alloc_tuple(4);
+ res = alloc_small(4, 0);
Field(res,0) = name;
Field(res,1) = aliases;
Field(res,2) = Val_int(ntohs(entry->s_port));