Testcase triggering this.
Index: llvm/test/AdaFrontend/fat_fields.adb =================================================================== --- /dev/null 1970-01-01 00:00:00.000000000 +0000 +++ llvm/test/AdaFrontend/fat_fields.adb 2007-03-02 12:50:25.000000000 +0100 @@ -0,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 =================================================================== --- /dev/null 1970-01-01 00:00:00.000000000 +0000 +++ llvm/test/AdaFrontend/fat_fields.ads 2007-03-02 12:50:25.000000000 +0100 @@ -0,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
