/* * Ikarus Scheme -- A compiler for R6RS Scheme. * Copyright (C) 2006,2007,2008 Abdulaziz Ghuloum * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License version 3 as * published by the Free Software Foundation. * * This program is distributed in the hope that it will be useful, but * WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "config.h" #if (!HAVE_GETADDRINFO) #include #include #include struct addrinfo { int ai_family; int ai_socktype; int ai_protocol; size_t ai_addrlen; struct sockaddr *ai_addr; struct addrinfo *ai_next; }; extern int getaddrinfo(const char *hostname, const char* servname, const struct addrinfo* hints, struct addrinfo** res); extern void freeaddrinfo(struct addrinfo *ai); #ifndef EAI_SYSTEM # define EAI_SYSTEM 11 /* same code as in glibc */ #endif #endif