From 10a3beff9df055018ee49d44e8db2736f8bd542c Mon Sep 17 00:00:00 2001
From: Xavier Leroy <xavier.leroy@inria.fr>
Date: Mon, 2 Jul 2001 12:24:13 +0000
Subject: Patches pour conformance ANSI stricte (compilo AIX xlc_r)
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3560 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
otherlibs/unix/gethost.c | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
(limited to 'otherlibs/unix/gethost.c')
diff --git a/otherlibs/unix/gethost.c b/otherlibs/unix/gethost.c
index a4a5bbb9e..ca22e39b3 100644
--- a/otherlibs/unix/gethost.c
+++ b/otherlibs/unix/gethost.c
@@ -46,10 +46,10 @@ static value alloc_host_entry(struct hostent *entry)
Begin_roots4 (name, aliases, addr_list, adr);
name = copy_string((char *)(entry->h_name));
- aliases = copy_string_array(entry->h_aliases);
+ aliases = copy_string_array((const char**)entry->h_aliases);
entry_h_length = entry->h_length;
#ifdef h_addr
- addr_list = alloc_array(alloc_one_addr, entry->h_addr_list);
+ addr_list = alloc_array(alloc_one_addr, (const char**)entry->h_addr_list);
#else
adr = alloc_one_addr(entry->h_addr);
addr_list = alloc_small(1, 0);
--
cgit v1.2.3-70-g09d2