aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDuncan Sands <baldrick@free.fr>2007-03-23 07:17:52 +0000
committerDuncan Sands <baldrick@free.fr>2007-03-23 07:17:52 +0000
commitb819a2b5fef660298b4f38ce951dd7f679f66b4f (patch)
tree06900746fd4ee46d194647ba60caa03856f3cddb
parentb8f1c1657f1b63f92957c5b1c5a4e26e4945c34d (diff)
Test handling of switches with wide case ranges.
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@35279 91177308-0d34-0410-b5e6-96231b3b80d8
-rw-r--r--test/AdaFrontend/switch.adb12
1 files changed, 12 insertions, 0 deletions
diff --git a/test/AdaFrontend/switch.adb b/test/AdaFrontend/switch.adb
new file mode 100644
index 0000000000..0eb20b22cb
--- /dev/null
+++ b/test/AdaFrontend/switch.adb
@@ -0,0 +1,12 @@
+-- RUN: %llvmgcc -c %s -o /dev/null
+function Switch (N : Integer) return Integer is
+begin
+ case N is
+ when Integer'First .. -1 =>
+ return -1;
+ when 0 =>
+ return 0;
+ when others =>
+ return 1;
+ end case;
+end;