OSDN Git Service

* fold-const.c (make_range_step) <TRUTH_NOT_EXPR>: Bail out if the
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gnat.dg / show_deques_priority.adb
1 --  { dg-do compile }
2
3 with Deques;
4 procedure Show_Deques_Priority is
5     use Deques;
6
7     PD : aliased P_Deque := Create;
8
9 begin
10     PD.Pop;
11 end Show_Deques_Priority;