Changes in directory llvm/test/FrontendAda:
unc_constructor.adb added (r1.1) unc_constructor.ads added (r1.1) --- Log message: Test that TREE_CONSTANT is being set correctly. --- Diffs of the changes: (+17 -0) unc_constructor.adb | 9 +++++++++ unc_constructor.ads | 8 ++++++++ 2 files changed, 17 insertions(+) Index: llvm/test/FrontendAda/unc_constructor.adb diff -c /dev/null llvm/test/FrontendAda/unc_constructor.adb:1.1 *** /dev/null Wed May 2 02:43:24 2007 --- llvm/test/FrontendAda/unc_constructor.adb Wed May 2 02:43:14 2007 *************** *** 0 **** --- 1,9 ---- + -- RUN: %llvmgcc -c %s -o /dev/null + package body Unc_Constructor is + procedure P (X : A) is + begin + if X = A0 then + null; + end if; + end; + end; Index: llvm/test/FrontendAda/unc_constructor.ads diff -c /dev/null llvm/test/FrontendAda/unc_constructor.ads:1.1 *** /dev/null Wed May 2 02:43:33 2007 --- llvm/test/FrontendAda/unc_constructor.ads Wed May 2 02:43:14 2007 *************** *** 0 **** --- 1,8 ---- + package Unc_Constructor is + type C is null record; + type A is array (Positive range <>) of C; + A0 : constant A; + procedure P (X : A); + private + A0 : aliased constant A := (1 .. 0 => (null record)); + end; _______________________________________________ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits