mirror of
https://github.com/RPCS3/llvm-mirror.git
synced 2024-10-30 23:42:52 +01:00
18 lines
303 B
LLVM
18 lines
303 B
LLVM
|
; RUN: llc < %s -O0
|
||
|
|
|
||
|
|
define i32 @main() {
|
||
|
|
entry:
|
||
|
|
call void @f()
|
||
|
|
ret i32 0
|
||
|
|
}
|
||
|
|
|
||
|
|
define void @f() gc "ocaml" {
|
||
|
|
entry:
|
||
|
|
%ptr.stackref = alloca i8*
|
||
|
|
%gcroot = bitcast i8** %ptr.stackref to i8**
|
||
|
|
call void @llvm.gcroot(i8** %gcroot, i8* null)
|
||
|
|
ret void
|
||
|
|
}
|
||
|
|
|
||
|
|
declare void @llvm.gcroot(i8**, i8*) nounwind
|