Testcase for handling of static constant declarations in EmitBIND_EXPR.

llvm-svn: 34927
This commit is contained in:
Duncan Sands 2007-03-05 08:39:58 +00:00
parent 49f6938169
commit 0af659640e
1 changed files with 5 additions and 0 deletions

View File

@ -0,0 +1,5 @@
-- RUN: %llvmgcc -c %s -o /dev/null
with Ada.Finalization;
package Emit_Var is
type Search_Type is new Ada.Finalization.Controlled with null record;
end;