/* implic.h -- Public #include File (module.h template V1.0) Copyright (C) 1995 Free Software Foundation, Inc. Contributed by James Craig Burley. This file is part of GNU Fortran. GNU Fortran is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version. GNU Fortran 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 GNU Fortran; see the file COPYING. If not, write to the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. Owning Modules: implic.c Modifications: */ /* Allow multiple inclusion to work. */ #ifndef GCC_F_IMPLIC_H #define GCC_F_IMPLIC_H /* Simple definitions and enumerations. */ /* Typedefs. */ /* Include files needed by this one. */ #include "info.h" #include "symbol.h" #include "target.h" /* Structure definitions. */ /* Global objects accessed by users of this module. */ /* Declare functions with prototypes. */ bool ffeimplic_establish_initial (char c, ffeinfoBasictype basic_type, ffeinfoKindtype kind_type, ffetargetCharacterSize size); bool ffeimplic_establish_symbol (ffesymbol s); void ffeimplic_init_2 (void); void ffeimplic_none (void); ffeinfoBasictype ffeimplic_peek_symbol_type (ffesymbol s, const char *name); void ffeimplic_terminate_2 (void); /* Define macros. */ #define ffeimplic_init_0() #define ffeimplic_init_1() #define ffeimplic_init_3() #define ffeimplic_init_4() #define ffeimplic_terminate_0() #define ffeimplic_terminate_1() #define ffeimplic_terminate_3() #define ffeimplic_terminate_4() /* End of #include file. */ #endif /* ! GCC_F_IMPLIC_H */