diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2009-04-30 14:35:22 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2009-04-30 14:35:22 +0000 |
| commit | 35debead51c672d94e09901096032aded316a45c (patch) | |
| tree | b930499490b07e1c897cdfe8e6d50538aecc8f2b /gcc/ada/sinput.ads | |
| parent | df35c271df60646a09af5279506c76c676a83217 (diff) | |
| download | gcc-35debead51c672d94e09901096032aded316a45c.zip gcc-35debead51c672d94e09901096032aded316a45c.tar.gz gcc-35debead51c672d94e09901096032aded316a45c.tar.bz2 | |
Makefile.in (dce.o): Add $(EXCEPT_H).
* Makefile.in (dce.o): Add $(EXCEPT_H).
* dce.c: Include except.h and delete redundant vector definitions.
(deletable_insn_p): Return false for non-call insns that can throw
if DF is running.
From-SVN: r147002
Diffstat (limited to 'gcc/ada/sinput.ads')
| -rw-r--r-- | gcc/ada/sinput.ads | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/ada/sinput.ads b/gcc/ada/sinput.ads index e2e4ec0..ca97716 100644 --- a/gcc/ada/sinput.ads +++ b/gcc/ada/sinput.ads @@ -423,8 +423,10 @@ package Sinput is -- Global Data -- ----------------- - Current_Source_File : Source_File_Index; - -- Source_File table index of source file currently being scanned + Current_Source_File : Source_File_Index := No_Source_File; + -- Source_File table index of source file currently being scanned. + -- Initialized so that some tools (such as gprbuild) can be built with + -- -gnatVa and pragma Initialized_Scalars without problems. Current_Source_Unit : Unit_Number_Type; -- Unit number of source file currently being scanned. The special value |