Changes in directory llvm/test/AdaFrontend:
fat_fields.adb added (r1.1) fat_fields.ads added (r1.1) --- Log message: Testcase causing the Ada front-end to create bogus constructor fields. --- Diffs of the changes: (+16 -0) fat_fields.adb | 10 ++++++++++ fat_fields.ads | 6 ++++++ 2 files changed, 16 insertions(+) Index: llvm/test/AdaFrontend/fat_fields.adb diff -c /dev/null llvm/test/AdaFrontend/fat_fields.adb:1.1 *** /dev/null Mon Mar 5 02:34:45 2007 --- llvm/test/AdaFrontend/fat_fields.adb Mon Mar 5 02:34:35 2007 *************** *** 0 **** --- 1,10 ---- + -- RUN: %llvmgcc -c %s -o /dev/null + -- RUN: %llvmgcc -c %s -O2 -o /dev/null + package body Fat_Fields is + procedure Proc is + begin + if P = null then + null; + end if; + end; + end; Index: llvm/test/AdaFrontend/fat_fields.ads diff -c /dev/null llvm/test/AdaFrontend/fat_fields.ads:1.1 *** /dev/null Mon Mar 5 02:34:52 2007 --- llvm/test/AdaFrontend/fat_fields.ads Mon Mar 5 02:34:35 2007 *************** *** 0 **** --- 1,6 ---- + package Fat_Fields is + pragma Elaborate_Body; + type A is array (Positive range <>) of Boolean; + type A_Ptr is access A; + P : A_Ptr := null; + end; _______________________________________________ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits