Fix a bunch of issues found in a testcase from 400.perlbench.
[oota-llvm.git] / test / Transforms / SimplifyLibCalls / Puts.ll
1 ; Test that the PutsCatOptimizer works correctly
2 ; RUN: llvm-upgrade < %s | llvm-as | opt -simplify-libcalls | llvm-dis | \
3 ; RUN:   not grep {call.*fputs}
4 ;
5 %struct._IO_FILE = type { int, sbyte*, sbyte*, sbyte*, sbyte*, sbyte*, sbyte*, sbyte*, sbyte*, sbyte*, sbyte*, sbyte*, %struct._IO_marker*, %struct._IO_FILE*, int, int, int, ushort, sbyte, [1 x sbyte], sbyte*, long, sbyte*, sbyte*, int, [52 x sbyte] }
6 %struct._IO_marker = type { %struct._IO_marker*, %struct._IO_FILE*, int }
7 %stdout = external global %struct._IO_FILE*             ; <%struct._IO_FILE**> [#uses=1]
8
9 declare int %fputs(sbyte*, %struct._IO_FILE*)
10
11 %empty = constant [1 x sbyte] c"\00"
12 %len1  = constant [2 x sbyte] c"A\00"
13 %long  = constant [7 x sbyte] c"hello\0A\00"
14
15 implementation   ; Functions:
16
17 int %main() {
18 entry:
19   %out = load %struct._IO_FILE** %stdout
20   %s1 = getelementptr [1 x sbyte]* %empty, int 0, int 0
21   %s2 = getelementptr [2 x sbyte]* %len1, int 0, int 0
22   %s3 = getelementptr [7 x sbyte]* %long, int 0, int 0
23   %a = call int %fputs( sbyte* %s1, %struct._IO_FILE* %out )
24   %b = call int %fputs( sbyte* %s2, %struct._IO_FILE* %out )
25   %c = call int %fputs( sbyte* %s3, %struct._IO_FILE* %out )
26   ret int 0
27 }