char *concat(args)
char *args;
{
  register char **a;
  register char *cp;
  register unsigned len;
  register char *ret;
  len = 1;
  for (a = &args; *a;)
    len += strlen(*a++);
  ret = cp = 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     1181 <concat+0x51>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x8,%rcx
mov    %rcx,-0x10(%rbp)
mov    (%rax),%rdi
call   1030 <strlen@plt>
mov    %rax,%rcx
mov    -0x1c(%rbp),%eax
add    %rcx,%rax
mov    %eax,-0x1c(%rbp)
jmp    114b <concat+0x1b>
mov    -0x1c(%rbp),%eax
mov    %eax,%edi
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     11a6 <concat+0x76>
mov    %rdi,%r15
mov    $0x1,%ebx
lea    0x10(%rsp),%r14
call   1030 <strlen@plt>
mov    %ebx,%ecx
mov    %eax,%ebx
add    %ecx,%ebx
mov    (%r14),%rdi
add    $0x8,%r14
test   %rdi,%rdi
jne    1150 <concat+0x20>
mov    %rbx,%rdi
call   1050 <malloc@plt>
mov    %rax,%r14
test   %r15,%r15
je     1199 <concat+0x69>
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    1180 <concat+0x50>
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 = zext 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 = zext 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 %28
6: ; preds = %1, %6
%7 = phi i8** [ %10, %6 ], [ %2, %1 ]
%8 = phi i64 [ %13, %6 ], [ 1, %1 ]
%9 = phi i8* [ %14, %6 ], [ %0, %1 ]
%10 = getelementptr inbounds i8*, i8** %7, i64 1
%11 = tail call i64 @strlen(i8* %9)
%12 = add i64 %11, %8
%13 = and i64 %12, 4294967295
%14 = load i8*, i8** %10
%15 = icmp eq i8* %14, null
br i1 %15, label %16, label %6
16: ; preds = %6
%17 = tail call i8* @malloc(i64 %13)
br i1 %3, label %28, label %18
18: ; preds = %16, %18
%19 = phi i8* [ %26, %18 ], [ %0, %16 ]
%20 = phi i8** [ %22, %18 ], [ %2, %16 ]
%21 = phi i8* [ %25, %18 ], [ %17, %16 ]
%22 = getelementptr inbounds i8*, i8** %20, i64 1
%23 = tail call i32 (i8*, i8*, ...) bitcast (i32 (...)* @copy to i32 (i8*, i8*, ...)*)(i8* %19, i8* %21)
%24 = sext i32 %23 to i64
%25 = inttoptr i64 %24 to i8*
%26 = load i8*, i8** %22
%27 = icmp eq i8* %26, null
br i1 %27, label %28, label %18
28: ; preds = %18, %4, %16
%29 = phi i8* [ %5, %4 ], [ %17, %16 ], [ %17, %18 ]
ret i8* %29
}