Merge from mainline (165734:167278).

[official-gcc/graphite-test-results.git] / gcc / testsuite / gnat.dg / opt7.ads

with Ada.Calendar; use Ada.Calendar;

package Opt7 is

   type time_t is (Absolute_Time, Delta_Time);

   procedure Parse (Str       :     String;
                    Time_Type : out time_t;
                    Abs_Time  : out Time;
                    Delt_Time : out Duration);

end Opt7;