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

From-SVN: r146162

diff --git a/gcc/ada/exp_ch4.adb b/gcc/ada/exp_ch4.adb
index bf6b3a60f86035775d159381ac92c87047f4d4d4..489e5a998cb1ca7fd507e8221ae078e7bc6727c0 100644 (file)
--- a/gcc/ada/exp_ch4.adb
+++ b/gcc/ada/exp_ch4.adb
@@ -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

diff --git a/gcc/ada/opt.ads b/gcc/ada/opt.ads
index 04e22cd71d9b74f1600e36ab57c5c23a44eebaa0..57ddd06ce286f45c5a4f9d6921f7db5ee80ccd7a 100644 (file)
--- a/gcc/ada/opt.ads
+++ b/gcc/ada/opt.ads
@@ -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