Use static inline to do the right thing when built in C99 mode. Of course,

[llvm/stm8.git] / test / FrontendAda / field_order.ads

-- RUN: %llvmgcc -S %s
package Field_Order is
   type Tagged_Type is abstract tagged null record;
   type With_Discriminant (L : Positive) is new Tagged_Type with record
      S : String (1 .. L);
   end record;
end;