Streamlined dependencies working, solver is greedy

2018-05-07 00:14:04 +02:00
parent cf1da607e8
commit 73d2b8b435
9 changed files with 41 additions and 20 deletions
@@ -0,0 +1,20 @@
+with Alire.Origins;
+
+package Alire.Platform with Preelaborate is
+
+   --  This interface encapsulates what a supported platform must provide for use in Alire, and a way
+   --    to hook it after elaboration
+
+   type Supported_Platform is interface;
+
+   function Package_Version (P      : Supported_Platform;
+                             Origin : Origins.Origin)
+                             return String is abstract;
+
+   procedure Set (P : Supported_Platform'Class);
+
+   function Current return Supported_Platform'Class
+     with Pre => Platform'Elaborated;
+   --  Always valid, because at worst a dummy do-nothign one is returned
+
+end Alire.Platform;