From 0832927844d196aa061e1e97b36567cc55cb56e2 Mon Sep 17 00:00:00 2001 From: Alejandro R Mosteo Date: Wed, 14 Mar 2018 12:35:09 +0100 Subject: [PATCH] +mathpaqs, -alire_reserved --- index/alire-index-alire.ads | 2 +- index/alire-index-mathpaqs.ads | 51 ++++++++++++++++++++++++++++++++++ index/alire-projects.ads | 16 +++++++++-- src/alire-index.adb | 2 +- src/alire-index.ads | 2 +- 5 files changed, 67 insertions(+), 6 deletions(-) create mode 100644 index/alire-index-mathpaqs.ads diff --git a/index/alire-index-alire.ads b/index/alire-index-alire.ads index 62aa370d..1cb824d2 100644 --- a/index/alire-index-alire.ads +++ b/index/alire-index-alire.ads @@ -23,7 +23,7 @@ package Alire.Index.Alire is Semantic_Versioning.V_0_1_2.Within_Minor and Simple_Logging.V_1_0.Within_Major); - function Example_Project is new Catalogued_Project (Projects.Alire_Reserved); + function Example_Project is new Catalogued_Project (Projects.Alire); Elite_Dangerous, Half_Life_3, diff --git a/index/alire-index-mathpaqs.ads b/index/alire-index-mathpaqs.ads new file mode 100644 index 00000000..b0206b14 --- /dev/null +++ b/index/alire-index-mathpaqs.ads @@ -0,0 +1,51 @@ +package Alire.Index.Mathpaqs is + + function Project is new Catalogued_Project (Projects.Mathpaqs); + + Prj_Repo : constant URL := "https://github.com/svn2github/Mathpaqs.git"; + Prj_Author : constant String := "Gautier de Montmollin"; + Prj_Website : constant URL := "https://mathpacks.sourceforge.io/"; + + V_20180114 : constant Release := + Project.Register + (V ("20180114"), + Git (Prj_Repo, "c17a6725c4b559ea55b64f0cf3c3660e558777ea"), + + Properties => + GPR_Scenario ("Build_Mode", "Debug" or "Style_Checks" or "Fast") and + + Executable ("arenstorf") and + Executable ("arithmetic_compression") and + Executable ("biomorph") and + Executable ("champ_vt") and + Executable ("cr_demo") and + Executable ("fractal") and + Executable ("gnat_int") and + Executable ("ppm2func") and + Executable ("show_floats_limits") and + Executable ("test_beta") and + Executable ("test_cholesky") and + Executable ("test_copulas") and + Executable ("test_ert") and + Executable ("test_estimators") and + Executable ("test_formulas") and + Executable ("test_gamma") and + Executable ("test_generic_real_linear_equations") and + Executable ("test_normal") and + Executable ("test_pareto") and + Executable ("test_poisson") and + Executable ("test_qr") and + Executable ("test_random_performance") and + Executable ("test_rsa") and + Executable ("test_samples") and + Executable ("test_sparse") and + Executable ("test_u_rand") and + + Author (Prj_Author) and + Website (Prj_Website) and + License (Unknown) + ); + + V_Pi_Day : Release renames V_20180114; -- Let's celebrate! + +end Alire.Index.Mathpaqs; diff --git a/index/alire-projects.ads b/index/alire-projects.ads index 26e00961..6cadadac 100644 --- a/index/alire-projects.ads +++ b/index/alire-projects.ads @@ -11,7 +11,6 @@ package Alire.Projects with Preelaborate is (Ada_Lua, Adacurses, Alire, - Alire_Reserved, -- Special release for internal use Alr, APQ, AUnit, @@ -56,6 +55,12 @@ package Alire.Projects with Preelaborate is LibSDL2_TTF, LibX11, + ------- + -- M -- + ------- + + Mathpaqs, + NcursesAda, OpenGLAda, @@ -92,8 +97,6 @@ package Alire.Projects with Preelaborate is "Wrapper on different packagings of NcursesAda", when Alire => "Alire project catalog and support files", - when Alire_Reserved => - "Alire internal", when Alr => "Command-line tool from the Alire project", when APQ => @@ -164,6 +167,13 @@ package Alire.Projects with Preelaborate is when LibX11 => "X11 client-side library", + ------- + -- M -- + ------- + + when Mathpaqs => + "A collection of mathematical, 100% portable, packages", + when NcursesAda => "Ada binding to the ncurses text interface library", diff --git a/src/alire-index.adb b/src/alire-index.adb index 2eb8a23c..ab474aa1 100644 --- a/src/alire-index.adb +++ b/src/alire-index.adb @@ -52,7 +52,7 @@ package body Alire.Index is function Exists (Project : Name_String) return Boolean is begin - return Names'Value (Project) = Alire_Reserved or else True; + return Names'Value (Project) = Projects.Alire or else True; exception when others => return False; diff --git a/src/alire-index.ads b/src/alire-index.ads index cf7c0d3a..402d5d40 100644 --- a/src/alire-index.ads +++ b/src/alire-index.ads @@ -338,6 +338,6 @@ private function Unavailable return Conditional.Dependencies is (Conditional.For_Dependencies.New_Value -- A conditional (without condition) dependency vector - (Dependencies.Vectors.New_Dependency (Projects.Alire_Reserved, Semver.Any))); + (Dependencies.Vectors.New_Dependency (Projects.Alire, Semver.At_Most (Semver.V ("0.0"))))); end Alire.Index;