Fixed Conditional with Empty Else branch

This commit is contained in:
Alejandro R Mosteo
2018-05-07 21:46:57 +02:00
parent bebbea1805
commit 14b157c963
+3 -1
View File
@@ -183,8 +183,10 @@ package body Alire.Conditional_Values is
begin
if Cond.Condition.Check (Against) then
return Evaluate (Cond.Then_Value.Element);
else
elsif not Cond.Else_Value.Is_Empty then
return Evaluate (Cond.Else_Value.Element);
else
return Empty;
end if;
end;
when Value =>