Gitiles
Code Review
Sign In
gerrit-public.fairphone.software
/
fp2-dev
/
platform
/
external
/
llvm
/
e209c383038f9e58c52c8b168879874818c63b11
/
.
/
test
/
FrontendAda
/
array_size.adb
blob: 2f07d063908200fa7277aa454c3478b5a2b8b2bb [
file
] [
log
] [
blame
]
--
RUN
:
%
llvmgcc
-
c
%
s
procedure
Array_Size
is
subtype S
is
String
(
1
..
2
);
type R
is
record
A
:
S
;
end
record
;
X
:
R
;
begin
null
;
end
;