mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2025-05-28 15:38:57 +00:00
Testcase for yet another global constant Ada f-e bug.
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@36874 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
parent
ecd94c804a
commit
56a837be5e
5
test/FrontendAda/global_constant.adb
Normal file
5
test/FrontendAda/global_constant.adb
Normal file
@ -0,0 +1,5 @@
|
|||||||
|
-- RUN: %llvmgcc -c %s -o /dev/null
|
||||||
|
package body Global_Constant is
|
||||||
|
begin
|
||||||
|
raise An_Error;
|
||||||
|
end;
|
4
test/FrontendAda/global_constant.ads
Normal file
4
test/FrontendAda/global_constant.ads
Normal file
@ -0,0 +1,4 @@
|
|||||||
|
package Global_Constant is
|
||||||
|
pragma Elaborate_Body;
|
||||||
|
An_Error : exception;
|
||||||
|
end;
|
Loading…
x
Reference in New Issue
Block a user