| commit | 412c70ed8a1b239e98f4855143d7730ad118fdea | [log] [tgz] |
|---|---|---|
| author | Chris Lattner <sabre@nondot.org> | Tue Apr 03 21:46:22 2007 +0000 |
| committer | Chris Lattner <sabre@nondot.org> | Tue Apr 03 21:46:22 2007 +0000 |
| tree | 97e7a6f548cec40bd0cbf3efacdbaf45d1710c77 | |
| parent | 2c2ec5f1380a68b4b73f4d2cc96b2617b6f14bf3 [diff] [blame] |
move ada tests llvm-svn: 35629
diff --git a/llvm/test/FrontendAda/switch.adb b/llvm/test/FrontendAda/switch.adb new file mode 100644 index 0000000..0eb20b2 --- /dev/null +++ b/llvm/test/FrontendAda/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;