Sign in
llvm
/
llvm
/
2aba8f7f84766599496a6a542d72cc21d1d27a23
/
.
/
test
/
FrontendAda
/
vce.adb
blob: 85cdca066a296080d30fb4e78b971c899afccb66 [
file
] [
log
] [
blame
]
--
RUN
:
%
llvmgcc
-
S
%
s
procedure VCE
is
S
:
String
(
1
..
2
);
B
:
Character
:=
'B'
;
begin
S
:=
'A'
&
B
;
end
;