OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [ada/] [prepcomp.ads] - Blame information for rev 281

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 281 jeremybenn
------------------------------------------------------------------------------
2
--                                                                          --
3
--                         GNAT COMPILER COMPONENTS                         --
4
--                                                                          --
5
--                             P R E P C O M P                              --
6
--                                                                          --
7
--                                 S p e c                                  --
8
--                                                                          --
9
--          Copyright (C) 2002-2007, 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 package stores all preprocessing data for the compiler
27
 
28
with Namet; use Namet;
29
 
30
package Prepcomp is
31
 
32
   procedure Add_Dependencies;
33
   --  Add dependencies on the preprocessing data file and the
34
   --  preprocessing definition files, if any.
35
 
36
   procedure Add_Symbol_Definition (Def : String);
37
   --  Add a symbol definition from the command line.
38
   --  Fail if definition is illegal.
39
 
40
   procedure Check_Symbols;
41
   --  Check if there are preprocessing symbols on the command line and
42
   --  set preprocessing if there are some: all files are preprocessed with
43
   --  these symbols. This procedure should not be called if there is a
44
   --  preprocessing data file specified on the command line. Procedure
45
   --  Parse_Preprocessing_Data_File should be called instead.
46
 
47
   procedure Parse_Preprocessing_Data_File (N : File_Name_Type);
48
   --  Parse a preprocessing data file, specified with a -gnatep= switch
49
 
50
   procedure Prepare_To_Preprocess
51
     (Source               : File_Name_Type;
52
      Preprocessing_Needed : out Boolean);
53
   --  Prepare, if necessary, the preprocessor for a source file.
54
   --  If the source file needs to be preprocessed, Preprocessing_Needed
55
   --  is set to True. Otherwise, Preprocessing_Needed is set to False
56
   --  and no preprocessing needs to be done.
57
 
58
   procedure Process_Command_Line_Symbol_Definitions;
59
   --  Check symbol definitions that have been added by calls to procedure
60
   --  Add_Symbol_Definition and stored as pointers to string, and put them in
61
   --  a table. The reason the definitions were stored as pointer to strings is
62
   --  that the name table is not yest initialized when we process the command
63
   --  line switches. These symbol definitions will be later used in
64
   --  the call to Prepare_To_Preprocess.
65
 
66
end Prepcomp;

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.