Fix a bunch of issues found in a testcase from 400.perlbench.
[oota-llvm.git] / test / Transforms / SimplifyLibCalls / StrCpy.ll
1 ; Test that the StrCpyOptimizer works correctly
2 ; RUN: llvm-upgrade < %s | llvm-as | opt -simplify-libcalls | llvm-dis | \
3 ; RUN:   not grep {call.*strcpy}
4
5 declare sbyte* %strcpy(sbyte*,sbyte*)
6 declare int %puts(sbyte*)
7 %hello = constant [6 x sbyte] c"hello\00"
8 %null = constant [1 x sbyte] c"\00"
9 %null_hello = constant [7 x sbyte] c"\00hello\00"
10
11 implementation   ; Functions:
12
13 int %main () {
14   %target = alloca [1024 x sbyte]
15   %arg1 = getelementptr [1024 x sbyte]* %target, int 0, int 0
16   store sbyte 0, sbyte* %arg1
17   %arg2 = getelementptr [6 x sbyte]* %hello, int 0, int 0
18   %rslt1 = call sbyte* %strcpy(sbyte* %arg1, sbyte* %arg2)
19   %arg3 = getelementptr [1 x sbyte]* %null, int 0, int 0
20   %rslt2 = call sbyte* %strcpy(sbyte* %rslt1, sbyte* %arg3)
21   %arg4 = getelementptr [7 x sbyte]* %null_hello, int 0, int 0
22   %rslt3 = call sbyte* %strcpy(sbyte* %rslt2, sbyte* %arg4)
23   call int %puts(sbyte* %rslt3)
24   ret int 0
25 }