Use static inline to do the right thing when built in C99 mode. Of course,
[llvm/stm8.git] / test / FrontendAda / vce_lv.adb
blobd1b9e0824f17c3786e37c4215396a195a014e776
1 -- RUN: %llvmgcc -S %s
2 procedure VCE_LV is
3 type P is access String ;
4 type T is new P (5 .. 7);
5 subtype U is String (5 .. 7);
6 X : T := new U'(others => 'A');
7 begin
8 null;
9 end;