Sign in
llvm
/
llvm
/
refs/heads/release_29
/
.
/
test
/
FrontendAda
/
switch.adb
blob: 0c83a2e6420e153359da25a4c043af09a5818253 [
file
] [
log
] [
blame
]
--
RUN
:
%
llvmgcc
-
S
%
s
function
Switch
(
N
:
Integer
)
return
Integer
is
begin
case
N
is
when
Integer
'First .. -1 =>
return -1;
when 0 =>
return 0;
when others =>
return 1;
end case;
end;