New packaging way without version redundancy

This commit is contained in:
Alejandro R Mosteo
2018-05-03 11:25:02 +02:00
parent 1d2adfa49f
commit a19b03e642
9 changed files with 169 additions and 50 deletions
+12
View File
@@ -83,6 +83,18 @@ package body Alire.Releases is
end return;
end Replacing;
---------------
-- Retagging --
---------------
function Retagging (Base : Release;
Version : Semantic_Versioning.Version) return Release is
begin
return Upgraded : Release := Base do
Upgraded.Version := Version;
end return;
end Retagging;
---------------
-- Upgrading --
---------------