block(an, op, t, d, p1, p2, p3) int *p1, *p2, *p3;
{
  register int *ap, *p, n;
  int *oldp;
  n = an + 3;
  p = gblock(n);
  oldp = p;
  ap = &op;
  do {
    *p++ = *ap++;
  } while (--n);
  return (oldp);
}


x86 assembly (clang, -O0):
<block>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    0x10(%rbp),%rax
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
mov    %ecx,-0x10(%rbp)
mov    %r8,-0x18(%rbp)
mov    %r9,-0x20(%rbp)
mov    -0x4(%rbp),%eax
add    $0x3,%eax
mov    %eax,-0x34(%rbp)
mov    -0x34(%rbp),%edi
mov    $0x0,%al
call   1030 <gblock@plt>
cltq
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rax
mov    %rax,-0x40(%rbp)
lea    -0x8(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
mov    %rax,%rcx
add    $0x4,%rcx
mov    %rcx,-0x28(%rbp)
mov    (%rax),%ecx
mov    -0x30(%rbp),%rax
mov    %rax,%rdx
add    $0x4,%rdx
mov    %rdx,-0x30(%rbp)
mov    %ecx,(%rax)
mov    -0x34(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x34(%rbp)
cmp    $0x0,%eax
jne    1159 <block+0x49>
mov    -0x40(%rbp),%rax
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<block>:
push   %r14
push   %rbx
push   %rax
mov    %edi,%ebx
mov    %esi,0x4(%rsp)
lea    0x3(%rbx),%edi
xor    %eax,%eax
call   1030 <gblock@plt>
movslq %eax,%r14
add    $0x2,%ebx
lea    0x4(,%rbx,4),%rdx
lea    0x4(%rsp),%rsi
mov    %r14,%rdi
call   1040 <memcpy@plt>
mov    %r14d,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r14
ret

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

LLVM IR (-O2):
define i32 @block(i32 %0, i32 %1, i32 %2, i32 %3, i32* nocapture readnone %4, i32* nocapture readnone %5, i32* nocapture readnone %6) {
%8 = alloca i32
store i32 %1, i32* %8
%9 = add nsw i32 %0, 3
%10 = tail call i32 (i32, ...) bitcast (i32 (...)* @gblock to i32 (i32, ...)*)(i32 %9)
%11 = sext i32 %10 to i64
%12 = inttoptr i64 %11 to i8*
%13 = add nsw i32 %0, 2
%14 = zext i32 %13 to i64
%15 = shl nuw nsw i64 %14, 2
%16 = add nuw nsw i64 %15, 4
%17 = bitcast i32* %8 to i8*
ret i32 %10
}