/****************************************************************************** * $Id: error.c,v 1.2 1993/09/16 08:51:40 courtel Exp $ * * Kind: C library of functions * Abstract: Get error numbers and messages in an Ada program * * Copyright 1990 - 1993 Centre d'Etudes de la Navigation Aerienne (CENA) * * PARADISE is free software; you can redistribute it and/or modify it * under the terms of the GNU Library General Public License * as published by the Free Software Foundation; * * PARADISE 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 Library General Public License for more details. * * You should have received a copy of the GNU Library General Public License * along with PARADISE; see the file COPYING. If not, write to * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. ******************************************************************************/ #include extern char *sys_errlist[]; int Errno () { return errno; } char * Sys_Errlist (errnum) int errnum; { return sys_errlist[errnum]; }