Expose Module::dump via C and Ocaml.
[oota-llvm.git] / test / Transforms / SimplifyLibCalls / Puts.ll
1 ; Test that the PutsCatOptimizer works correctly
2 ; RUN: llvm-as < %s | opt -simplify-libcalls | llvm-dis | \
3 ; RUN:   not grep {call.*fputs}
4 ;
5
6         %struct._IO_FILE = type { i32, i8*, i8*, i8*, i8*, i8*, i8*, i8*, i8*, i8*, i8*, i8*, %struct._IO_marker*, %struct._IO_FILE*, i32, i32, i32, i16, i8, [1 x i8], i8*, i64, i8*, i8*, i32, [52 x i8] }
7         %struct._IO_marker = type { %struct._IO_marker*, %struct._IO_FILE*, i32 }
8 @stdout = external global %struct._IO_FILE*             ; <%struct._IO_FILE**> [#uses=1]
9 @empty = constant [1 x i8] zeroinitializer              ; <[1 x i8]*> [#uses=1]
10 @len1 = constant [2 x i8] c"A\00"               ; <[2 x i8]*> [#uses=1]
11 @long = constant [7 x i8] c"hello\0A\00"                ; <[7 x i8]*> [#uses=1]
12
13 declare i32 @fputs(i8*, %struct._IO_FILE*)
14
15 define i32 @main() {
16 entry:
17         %out = load %struct._IO_FILE** @stdout          ; <%struct._IO_FILE*> [#uses=3]
18         %s1 = getelementptr [1 x i8]* @empty, i32 0, i32 0              ; <i8*> [#uses=1]
19         %s2 = getelementptr [2 x i8]* @len1, i32 0, i32 0               ; <i8*> [#uses=1]
20         %s3 = getelementptr [7 x i8]* @long, i32 0, i32 0               ; <i8*> [#uses=1]
21         %a = call i32 @fputs( i8* %s1, %struct._IO_FILE* %out )         ; <i32> [#uses=0]
22         %b = call i32 @fputs( i8* %s2, %struct._IO_FILE* %out )         ; <i32> [#uses=0]
23         %c = call i32 @fputs( i8* %s3, %struct._IO_FILE* %out )         ; <i32> [#uses=0]
24         ret i32 0
25 }
26