Skip to content

R
riscv-gcc-1
Commit fa702fbd by Arnaud Charlet
Options

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

From-SVN: r146162
parent bded454f
Showing with 4 additions and 4 deletions
gcc/ada/exp_ch4.adb
...@@ -2836,7 +2836,7 @@ package body Exp_Ch4 is ...@@ -2836,7 +2836,7 @@ package body Exp_Ch4 is
if Atyp = Standard_String if Atyp = Standard_String
and then NN in 2 .. 9 and then NN in 2 .. 9
and then (Opt.Optimization_Level = 0 and then (Opt.Optimization_Level = 0
or else Opt.Optimize_Size = 1 or else Opt.Optimize_Size /= 0
or else Debug_Flag_Dot_CC) or else Debug_Flag_Dot_CC)
and then not Debug_Flag_Dot_C and then not Debug_Flag_Dot_C
then then
......
gcc/ada/opt.ads
...@@ -913,9 +913,9 @@ package Opt is ...@@ -913,9 +913,9 @@ package Opt is
Optimize_Size : Int; Optimize_Size : Int;
pragma Import (C, Optimize_Size, "optimize_size"); pragma Import (C, Optimize_Size, "optimize_size");
-- Constant reflecting setting of -Os (optimize for size). Set to 1 in -- Constant reflecting setting of -Os (optimize for size). Set to nonzero
-- -Os mode and set to 0 otherwise. See jmissing.c and aamissing.c for -- in -Os mode and set to zero otherwise. See jmissing.c and aamissing.c
-- definitions for dotnet/jgnat and GNAAMP backends -- for definitions of "optimize_size" for dotnet/jgnat and GNAAMP backends
Output_File_Name_Present : Boolean := False; Output_File_Name_Present : Boolean := False;
-- GNATBIND, GNAT, GNATMAKE, GPRMAKE -- GNATBIND, GNAT, GNATMAKE, GPRMAKE
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment