Sign in
llvm
/
llvm
/
2aba8f7f84766599496a6a542d72cc21d1d27a23
/
.
/
test
/
FrontendAda
/
emit_var.ads
blob: 47e2538691aca1fbd4928b8ab61a0801f1bcad84 [
file
] [
log
] [
blame
]
--
RUN
:
%
llvmgcc
-
S
%
s
with
Ada
.
Finalization
;
package
Emit_Var
is
type
Search_Type
is
new
Ada
.
Finalization
.
Controlled
with
null
record
;
end
;