gcc/ada/snames.h-tmpl

   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
  39 extern 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
  52 extern 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
  60 extern 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) */