char *concat(args)
char *args;
{
  register char **a;
  register char *cp;
  register int len;
  register char *ret;
  len = 1;
  for (a = &args; *a;)
    len += strlen(*a++);
  ret = cp = (char *)malloc(len);
  for (a = &args; *a;)
    cp = copy(*a++, cp);
  return (ret);
}


x86 assembly (clang, -O0):
<concat>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
movl   $0x1,-0x1c(%rbp)
lea    -0x8(%rbp),%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
cmpq   $0x0,(%rax)
je     1182 <concat+0x52>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x8,%rcx
mov    %rcx,-0x10(%rbp)
mov    (%rax),%rdi
call   1030 <strlen@plt>
mov    %rax,%rcx
movslq -0x1c(%rbp),%rax
add    %rcx,%rax
mov    %eax,-0x1c(%rbp)
jmp    114b <concat+0x1b>
movslq -0x1c(%rbp),%rdi
call   1050 <malloc@plt>
mov    %rax,-0x18(%rbp)
mov    %rax,-0x28(%rbp)
lea    -0x8(%rbp),%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
cmpq   $0x0,(%rax)
je     11d1 <concat+0xa1>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x8,%rcx
mov    %rcx,-0x10(%rbp)
mov    (%rax),%rdi
mov    -0x18(%rbp),%rsi
mov    $0x0,%al
call   1040 <copy@plt>
cltq
mov    %rax,-0x18(%rbp)
jmp    119b <concat+0x6b>
mov    -0x28(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<concat>:
push   %r15
push   %r14
push   %rbx
sub    $0x10,%rsp
mov    %rdi,0x8(%rsp)
test   %rdi,%rdi
je     11b6 <concat+0x86>
mov    %rdi,%r15
mov    $0x1,%r14d
lea    0x10(%rsp),%rbx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
call   1030 <strlen@plt>
add    %r14d,%eax
movslq %eax,%r14
mov    (%rbx),%rdi
add    $0x8,%rbx
test   %rdi,%rdi
jne    1160 <concat+0x30>
mov    %r14,%rdi
call   1050 <malloc@plt>
mov    %rax,%r14
test   %r15,%r15
je     11a9 <concat+0x79>
lea    0x10(%rsp),%rbx
mov    %r14,%rsi
nop
mov    %r15,%rdi
xor    %eax,%eax
call   1040 <copy@plt>
movslq %eax,%rsi
mov    (%rbx),%r15
add    $0x8,%rbx
test   %r15,%r15
jne    1190 <concat+0x60>
mov    %r14,%rax
add    $0x10,%rsp
pop    %rbx
pop    %r14
pop    %r15
ret
mov    $0x1,%edi
add    $0x10,%rsp
pop    %rbx
pop    %r14
pop    %r15
jmp    1050 <malloc@plt>

LLVM IR (-O0):
define i8* @concat(i8* %0) {
%2 = alloca i8*
%3 = alloca i8**
%4 = alloca i8*
%5 = alloca i32
%6 = alloca i8*
store i8* %0, i8** %2
store i32 1, i32* %5
store i8** %2, i8*** %3
br label %7
7: ; preds = %11, %1
%8 = load i8**, i8*** %3
%9 = load i8*, i8** %8
%10 = icmp ne i8* %9, null
br i1 %10, label %11, label %20
11: ; preds = %7
%12 = load i8**, i8*** %3
%13 = getelementptr inbounds i8*, i8** %12, i32 1
store i8** %13, i8*** %3
%14 = load i8*, i8** %12
%15 = call i64 @strlen(i8* %14)
%16 = load i32, i32* %5
%17 = sext i32 %16 to i64
%18 = add i64 %17, %15
%19 = trunc i64 %18 to i32
store i32 %19, i32* %5
br label %7
20: ; preds = %7
%21 = load i32, i32* %5
%22 = sext i32 %21 to i64
%23 = call i8* @malloc(i64 %22)
store i8* %23, i8** %4
store i8* %23, i8** %6
store i8** %2, i8*** %3
br label %24
24: ; preds = %28, %20
%25 = load i8**, i8*** %3
%26 = load i8*, i8** %25
%27 = icmp ne i8* %26, null
br i1 %27, label %28, label %36
28: ; preds = %24
%29 = load i8**, i8*** %3
%30 = getelementptr inbounds i8*, i8** %29, i32 1
store i8** %30, i8*** %3
%31 = load i8*, i8** %29
%32 = load i8*, i8** %4
%33 = call i32 (i8*, i8*, ...) bitcast (i32 (...)* @copy to i32 (i8*, i8*, ...)*)(i8* %31, i8* %32)
%34 = sext i32 %33 to i64
%35 = inttoptr i64 %34 to i8*
store i8* %35, i8** %4
br label %24
36: ; preds = %24
%37 = load i8*, i8** %6
ret i8* %37
}

LLVM IR (-O2):
define i8* @concat(i8* %0) {
%2 = alloca i8*
store i8* %0, i8** %2
%3 = icmp eq i8* %0, null
br i1 %3, label %4, label %6
4: ; preds = %1
%5 = tail call dereferenceable_or_null(1) i8* @malloc(i64 1)
br label %29
6: ; preds = %1, %6
%7 = phi i8** [ %10, %6 ], [ %2, %1 ]
%8 = phi i64 [ %14, %6 ], [ 1, %1 ]
%9 = phi i8* [ %15, %6 ], [ %0, %1 ]
%10 = getelementptr inbounds i8*, i8** %7, i64 1
%11 = tail call i64 @strlen(i8* %9)
%12 = add i64 %11, %8
%13 = shl i64 %12, 32
%14 = ashr exact i64 %13, 32
%15 = load i8*, i8** %10
%16 = icmp eq i8* %15, null
br i1 %16, label %17, label %6
17: ; preds = %6
%18 = tail call i8* @malloc(i64 %14)
br i1 %3, label %29, label %19
19: ; preds = %17, %19
%20 = phi i8* [ %27, %19 ], [ %0, %17 ]
%21 = phi i8** [ %23, %19 ], [ %2, %17 ]
%22 = phi i8* [ %26, %19 ], [ %18, %17 ]
%23 = getelementptr inbounds i8*, i8** %21, i64 1
%24 = tail call i32 (i8*, i8*, ...) bitcast (i32 (...)* @copy to i32 (i8*, i8*, ...)*)(i8* %20, i8* %22)
%25 = sext i32 %24 to i64
%26 = inttoptr i64 %25 to i8*
%27 = load i8*, i8** %23
%28 = icmp eq i8* %27, null
br i1 %28, label %29, label %19
29: ; preds = %19, %4, %17
%30 = phi i8* [ %5, %4 ], [ %18, %17 ], [ %18, %19 ]
ret i8* %30
}