summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/show_deques_priority.adb
blob: 614e825a957919a4e5f1482f95752093430d4876 (plain)
1
2
3
4
5
6
7
8
9
10
11
--  { dg-do compile }

with Deques;
procedure Show_Deques_Priority is
    use Deques;

    PD : aliased P_Deque := Create;

begin
    PD.Pop;
end Show_Deques_Priority;