procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

vms_data.ads: Add qualifier for the new gnatmetric '-lratio' option

Browse source 
* vms_data.ads: Add qualifier for the new gnatmetric '-lratio' option

	* gnat_ugn.texi: Add description of the new '-lratio' option
	Update 7.3.1 section about availability of the feature.

	* exp_smem.ads, exp_smem.adb (Make_Shared_Var_Procs): Return last
	inserted node.

	* Makefile.in: (mips-irix section): Activate build of libgmem.

From-SVN: r128339
This commit is contained in:
Arnaud Charlet 2007-09-10 14:49:21 +02:00
parent 4b272fdd23
commit 8989330225
4 changed files with 26 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
gcc/ada/Makefile.in
View file

@ -990,6 +990,7 @@ ifeq ($(strip $(filter-out mips sgi irix%,$(targ))),)
MISCLIB = -lexc
PREFIX_OBJS = $(PREFIX_REAL_OBJS)
LIBRARY_VERSION := $(LIB_VERSION)
GMEM_LIB = gmemlib
endif
ifeq ($(strip $(filter-out hppa% hp hpux10%,$(targ))),)

14
gcc/ada/exp_smem.ads
View file

@ -6,18 +6,17 @@
-- --
-- S p e c --
-- --
-- Copyright (C) 1998-2000, Free Software Foundation, Inc. --
-- Copyright (C) 1998-2007, Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
-- ware Foundation; either version 2, or (at your option) any later ver- --
-- ware Foundation; either version 3, or (at your option) any later ver- --
-- sion. GNAT is distributed in the hope that it will be useful, but WITH- --
-- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY --
-- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License --
-- for more details. You should have received a copy of the GNU General --
-- Public License distributed with GNAT; see file COPYING. If not, write --
-- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, --
-- Boston, MA 02110-1301, USA. --
-- Public License distributed with GNAT; see file COPYING3. If not, go to --
-- http://www.gnu.org/licenses for a complete copy of the license. --
-- --
-- GNAT was originally developed by the GNAT team at New York University. --
-- Extensive contributions were provided by Ada Core Technologies Inc. --
@ -49,10 +48,11 @@ package Exp_Smem is
-- global lock calls for this case. It also generates the necessary
-- read/write calls for the protected object within the lock region.
procedure Make_Shared_Var_Procs (N : Node_Id);
function Make_Shared_Var_Procs (N : Node_Id) return Node_Id;
-- N is the node for the declaration of a shared passive variable. This
-- procedure constructs and inserts the read and assignment procedures
-- for the shared memory variable. See System.Shared_Storage for a full
-- description of these procedures and how they are used.
-- description of these procedures and how they are used. The last inserted
-- node is returned.
end Exp_Smem;

13
gcc/ada/gnat_ugn.texi
View file

@ -10143,8 +10143,9 @@ never used by this executable.
This feature will allow you to eliminate such unused code from your
executable, making it smaller (in disk and in memory).
This functionality is available on all platforms using elf binary format and
having GNU binutils version 2.16.1.
This functionality is available on all Linux platforms except for the IA-64
architecture and on all cross platforms using the ELF binary file format.
In both cases GNU binutils version 2.16 or later are required to enable it.
@node Compilation options
@subsection Compilation options
@ -16434,6 +16435,10 @@ the number of comment lines
@item
the number of code lines containing end-of-line comments;
@item
the ratio between the number of lines that contain comments and the number of all
the non-blank lines expressed in percentages (the comment percentage);
@item
the number of empty lines and lines containing only space characters and/or
format effectors (blank lines)
@ -16467,6 +16472,10 @@ The number of comment lines
The number of code lines containing
end-of-line comments
@cindex @option{^-ratio^/COMMENT_PERCENTAGE^} (@command{gnatmetric})
@item ^-ratio^/COMMENT_PERCENTAGE^
The comment percentage in the program text
@cindex @option{^-lb^/BLANK_LINES^} (@command{gnatmetric})
@item ^-lb^/BLANK_LINES^
The number of blank lines

11
gcc/ada/vms_data.ads
View file

@ -10,14 +10,13 @@
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
-- ware Foundation; either version 2, or (at your option) any later ver- --
-- ware Foundation; either version 3, or (at your option) any later ver- --
-- sion. GNAT is distributed in the hope that it will be useful, but WITH- --
-- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY --
-- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License --
-- for more details. You should have received a copy of the GNU General --
-- Public License distributed with GNAT; see file COPYING. If not, write --
-- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, --
-- Boston, MA 02110-1301, USA. --
-- Public License distributed with GNAT; see file COPYING3. If not, go to --
-- http://www.gnu.org/licenses for a complete copy of the license. --
-- --
-- GNAT was originally developed by the GNAT team at New York University. --
-- Extensive contributions were provided by Ada Core Technologies Inc. --
@ -4563,6 +4562,8 @@ package VMS_Data is
"-lcomm " &
"MIXED_CODE_COMMENTS " &
"-leol " &
"COMMENT_PERCENTAGE " &
"-lratio " &
"BLANK_LINES " &
"-lb ";
-- /LINE_METRICS=(option, option ...)
@ -4579,6 +4580,8 @@ package VMS_Data is
-- COMENT_LINES All comment lines are computed
-- MIXED_CODE_COMMENTS All lines containing both code and comment are
-- computed
-- COMMENT_PERCENTAGE Ratio between comment lines and all the lines
-- containing comments and program code
-- BLANK_LINES Blank lines are computed
--
-- All combinations of line metrics options are allowed.