blob: f2ad6df7feb9801b53a25715c851c6eb8ceb89c4 [file] [log] [blame]
Duncan Sands9426caa2007-05-05 20:22:08 +00001; RUN: llvm-as < %s | llc -march=x86 -enable-eh -o - | grep zPLR
2
3@error = external global i8 ; <i8*> [#uses=2]
4
5define void @_ada_x() {
6entry:
7 invoke void @raise( )
8 to label %eh_then unwind label %unwind
9
10unwind: ; preds = %entry
11 %eh_ptr = tail call i8* @llvm.eh.exception( ) ; <i8*> [#uses=2]
12 %eh_select = tail call i32 (i8*, i8*, ...)* @llvm.eh.selector( i8* %eh_ptr, i8* bitcast (i32 (...)* @__gnat_eh_personality to i8*), i8* @error ) ; <i32> [#uses=1]
13 %eh_typeid = tail call i32 @llvm.eh.typeid.for( i8* @error ) ; <i32> [#uses=1]
14 %tmp2 = icmp eq i32 %eh_select, %eh_typeid ; <i1> [#uses=1]
15 br i1 %tmp2, label %eh_then, label %Unwind
16
17eh_then: ; preds = %unwind, %entry
18 ret void
19
20Unwind: ; preds = %unwind
21 tail call i32 (...)* @_Unwind_Resume( i8* %eh_ptr ) ; <i32>:0 [#uses=0]
22 unreachable
23}
24
25declare void @raise()
26
27declare i8* @llvm.eh.exception()
28
29declare i32 @llvm.eh.selector(i8*, i8*, ...)
30
31declare i32 @llvm.eh.typeid.for(i8*)
32
33declare i32 @__gnat_eh_personality(...)
34
35declare i32 @_Unwind_Resume(...)