OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* exp_ch4.adb, opt.ads: Minor editing.

Browse Source 
From-SVN: r146162
This commit is contained in:
Arnaud Charlet 2009-04-16 12:17:14 +02:00
parent bded454f79
commit fa702fbdb5
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
gcc/ada/exp_ch4.adb
View File

@ -2836,7 +2836,7 @@ package body Exp_Ch4 is
if Atyp = Standard_String
and then NN in 2 .. 9
and then (Opt.Optimization_Level = 0
or else Opt.Optimize_Size = 1
or else Opt.Optimize_Size /= 0
or else Debug_Flag_Dot_CC)
and then not Debug_Flag_Dot_C
then

6
gcc/ada/opt.ads
View File

@ -913,9 +913,9 @@ package Opt is
Optimize_Size : Int;
pragma Import (C, Optimize_Size, "optimize_size");
-- Constant reflecting setting of -Os (optimize for size). Set to 1 in
-- -Os mode and set to 0 otherwise. See jmissing.c and aamissing.c for
-- definitions for dotnet/jgnat and GNAAMP backends
-- Constant reflecting setting of -Os (optimize for size). Set to nonzero
-- in -Os mode and set to zero otherwise. See jmissing.c and aamissing.c
-- for definitions of "optimize_size" for dotnet/jgnat and GNAAMP backends
Output_File_Name_Present : Boolean := False;
-- GNATBIND, GNAT, GNATMAKE, GPRMAKE