1
0
mirror of https://github.com/RPCS3/llvm-mirror.git synced 2024-10-19 19:12:56 +02:00

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 8aee7f8a56
commit 5498a32001

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;