1------------------------------------------------------------------------------
2--                                                                          --
3--                              GPR TECHNOLOGY                              --
4--                                                                          --
5--                     Copyright (C) 2001-2016, AdaCore                     --
6--                                                                          --
7-- This is  free  software;  you can redistribute it and/or modify it under --
8-- terms of the  GNU  General Public License as published by the Free Soft- --
9-- ware  Foundation;  either version 3,  or (at your option) any later ver- --
10-- sion.  This software is distributed in the hope  that it will be useful, --
11-- but WITHOUT ANY WARRANTY;  without even the implied warranty of MERCHAN- --
12-- TABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public --
13-- License for more details.  You should have received  a copy of the  GNU  --
14-- General Public License distributed with GNAT; see file  COPYING. If not, --
15-- see <http://www.gnu.org/licenses/>.                                      --
16--                                                                          --
17------------------------------------------------------------------------------
18
19--  This package spec holds version information for the GPR tools.
20--  It is updated whenever the release number is changed and at the beginning
21--  of each calendar year.
22
23package GPR_Version is
24
25   Gpr_Version : constant String := "17.0w";
26   --  Static string identifying this version
27
28   Date : constant String := "20150615";
29
30   Current_Year : constant String := "2016";
31
32   type Gnat_Build_Type is (Gnatpro, FSF, GPL);
33   --  See Get_Gnat_Build_Type below for the meaning of these values
34
35   Build_Type : constant Gnat_Build_Type := Gnatpro;
36   --  Kind of GNAT Build:
37   --
38   --    FSF
39   --       GNAT FSF version. This version of GNAT is part of a Free Software
40   --       Foundation release of the GNU Compiler Collection (GCC). The bug
41   --       box generated by Comperr gives information on how to report bugs
42   --       and list the "no warranty" information.
43   --
44   --    Gnatpro
45   --       GNAT Professional version. This version of GNAT is supported by Ada
46   --       Core Technologies. The bug box generated by package Comperr gives
47   --       instructions on bug submission that include references to customer
48   --       number, gnattracker site etc.
49   --
50   --    GPL
51   --       GNAT GPL Edition. This is a special version of GNAT, released by
52   --       Ada Core Technologies and intended for academic users, and free
53   --       software developers. The bug box generated by the package Comperr
54   --       gives appropriate bug submission instructions that do not reference
55   --       customer number etc.
56
57   function Gpr_Version_String return String;
58   --  Version output when GPRBUILD or its related tools, including
59   --  GPRCLEAN, are run (with appropriate verbose option switch set).
60
61   function Free_Software return String;
62   --  Text to be displayed by the different GNAT tools when switch --version
63   --  is used. This text depends on the GNAT build type.
64
65   function Copyright_Holder return String;
66   --  Return the name of the Copyright holder to be displayed by the different
67   --  GNAT tools when switch --version is used.
68
69end GPR_Version;
70