Require target lra in gcc.dg/pr108095.c

[official-gcc.git] / gcc / testsuite / gnat.dg / warn30.ads

with Interfaces; use type Interfaces.Integer_64;

package Warn30 is
   procedure Incr (X : in out Interfaces.Integer_64) with
     Post => X = X'Old + 1;
end Warn30;