Gitiles
Code Review
Sign In
gerrit-public.fairphone.software
/
platform
/
external
/
llvm
/
cbdf0e2455d78b047aec4141ec84cf96095bee16
/
.
/
test
/
FrontendAda
/
vce.adb
blob: f24045cbee3f08db616d6461e373ba8e9348fc26 [
file
] [
log
] [
blame
]
--
RUN
:
%
llvmgcc
-
c
%
s
procedure VCE
is
S
:
String
(
1
..
2
);
B
:
Character
:=
'B'
;
begin
S
:=
'A'
&
B
;
end
;