Sign in
ara-mdk
/
platform
/
external
/
llvm
/
6654ff2741bf1c09de6ffaff5e15c3affdab0333
/
.
/
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
;