1/**************************************************************************** 2 * * 3 * GNAT COMPILER COMPONENTS * 4 * * 5 * S N A M E S * 6 * * 7 * C Header File * 8 * * 9 * Copyright (C) 1992-2008, Free Software Foundation, Inc. * 10 * * 11 * GNAT is free software; you can redistribute it and/or modify it under * 12 * terms of the GNU General Public License as published by the Free Soft- * 13 * ware Foundation; either version 3, or (at your option) any later ver- * 14 * sion. GNAT is distributed in the hope that it will be useful, but WITH- * 15 * OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY * 16 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License * 17 * for more details. You should have received a copy of the GNU General * 18 * Public License distributed with GNAT; see file COPYING3. If not, go to * 19 * http://www.gnu.org/licenses for a complete copy of the license. * 20 * * 21 * GNAT was originally developed by the GNAT team at New York University. * 22 * Extensive contributions were provided by Ada Core Technologies Inc. * 23 * * 24 ****************************************************************************/ 25 26/* This is the C file that corresponds to the Ada package specification 27 Snames. It was created automatically from the file snames.ads. */ 28 29/* Name_Id values */ 30 31#define Name_ !! TEMPLATE INSERTION POINT 32 33/* Define the function to return one of the numeric values below. Note 34 that it actually returns a char since an enumeration value of less 35 than 256 entries is represented that way in Ada. The operand is a Chars 36 field value. */ 37 38#define Get_Attribute_Id snames__get_attribute_id 39extern unsigned char Get_Attribute_Id (int); 40 41/* Define the numeric values for attributes. */ 42 43#define Attr_ !! TEMPLATE INSERTION POINT 44 45/* Define the numeric values for the conventions. */ 46 47#define Convention_ !! TEMPLATE INSERTION POINT 48 49/* Define the function to check if a Name_Id value is a valid pragma */ 50 51#define Is_Pragma_Name snames__is_pragma_name 52extern Boolean Is_Pragma_Name (Name_Id); 53 54/* Define the function to return one of the numeric values below. Note 55 that it actually returns a char since an enumeration value of less 56 than 256 entries is represented that way in Ada. The operand is a Chars 57 field value. */ 58 59#define Get_Pragma_Id snames__get_pragma_id 60extern unsigned char Get_Pragma_Id (int); 61 62/* Define the numeric values for the pragmas. */ 63 64#define Pragma_ !! TEMPLATE_INSERTION_POINT 65 66/* End of snames.h (C version of Snames package spec) */ 67