Commit 77a0405b by Olivier Hainque

Commit testsuite part of r151322, omitted by mistake then.

        * gnat.dg/array7.ad[bs]: Add check for Signed_Integer_Type_Definition.

From-SVN: r152163
parent 0e505d53
......@@ -3,9 +3,18 @@
package body Array7 is
function Get_Arr (Nbr : My_Range) return Arr_Acc is
begin
return new Arr (1 .. Nbr);
package body Range_Subtype is
function Get_Arr (Nbr : My_Range) return Arr_Acc is
begin
return new Arr (1 .. Nbr);
end;
end;
package body Range_Type is
function Get_Arr (Nbr : My_Range) return Arr_Acc is
begin
return new Arr (1 .. Nbr);
end;
end;
end Array7;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment