Sign in
llvm
/
llvm
/
refs/heads/release_29
/
.
/
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
;