char **pm_allocarray(cols, rows, size)
int cols, rows;
int size;
{
  char **its;
  int i;
  its = (char **)malloc(rows * sizeof(char *));
  if (its == (char **)0)
    pm_error("out of memory allocating an array");
  its[0] = (char *)malloc(rows * cols * size);
  if (its[0] == (char *)0)
    pm_error("out of memory allocating an array");
  for (i = 1; i < rows; ++i)
    its[i] = &(its[0][i * cols * size]);
  return its;
}


x86 assembly (clang, -O0):
<pm_allocarray>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
movslq -0x8(%rbp),%rdi
shl    $0x3,%rdi
call   1030 <malloc@plt>
mov    %rax,-0x18(%rbp)
cmpq   $0x0,-0x18(%rbp)
jne    115b <pm_allocarray+0x3b>
lea    0xeac(%rip),%rdi
mov    $0x0,%al
call   1040 <pm_error@plt>
mov    -0x8(%rbp),%eax
imul   -0x4(%rbp),%eax
imul   -0xc(%rbp),%eax
movslq %eax,%rdi
call   1030 <malloc@plt>
mov    %rax,%rcx
mov    -0x18(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x18(%rbp),%rax
cmpq   $0x0,(%rax)
jne    1194 <pm_allocarray+0x74>
lea    0xe73(%rip),%rdi
mov    $0x0,%al
call   1040 <pm_error@plt>
movl   $0x1,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    11d8 <pm_allocarray+0xb8>
mov    -0x18(%rbp),%rax
mov    (%rax),%rdx
mov    -0x1c(%rbp),%eax
imul   -0x4(%rbp),%eax
imul   -0xc(%rbp),%eax
cltq
add    %rax,%rdx
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    119b <pm_allocarray+0x7b>
mov    -0x18(%rbp),%rax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<pm_allocarray>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %edx,%r15d
mov    %esi,%r12d
mov    %edi,%ebp
movslq %esi,%rdi
shl    $0x3,%rdi
call   1030 <malloc@plt>
mov    %rax,%r13
test   %rax,%rax
jne    1155 <pm_allocarray+0x35>
lea    0xeb2(%rip),%rdi
xor    %eax,%eax
call   1040 <pm_error@plt>
mov    %r15d,%ebx
imul   %ebp,%ebx
mov    %ebx,%eax
imul   %r12d,%eax
movslq %eax,%rdi
call   1030 <malloc@plt>
mov    %rax,%r14
mov    %rax,0x0(%r13)
test   %rax,%rax
je     1180 <pm_allocarray+0x60>
cmp    $0x2,%r12d
jge    1198 <pm_allocarray+0x78>
jmp    1257 <pm_allocarray+0x137>
lea    0xe79(%rip),%rdi
xor    %eax,%eax
call   1040 <pm_error@plt>
cmp    $0x2,%r12d
jl     1257 <pm_allocarray+0x137>
mov    %r12d,%eax
lea    -0x1(%rax),%r9
add    $0xfffffffffffffffe,%rax
mov    %r9d,%r8d
and    $0x3,%r8d
mov    $0x1,%ecx
cmp    $0x3,%rax
jb     1217 <pm_allocarray+0xf7>
mov    %ebp,%r10d
and    $0xfffffffffffffffc,%r9
lea    0x0(,%rbx,4),%esi
lea    (%rbx,%rbx,2),%edi
lea    (%rbx,%rbx,1),%eax
xor    %ecx,%ecx
mov    %esi,%edx
nopl   (%rax)
movslq %ebx,%rbx
lea    (%r14,%rbx,1),%rbp
mov    %rbp,0x8(%r13,%rcx,8)
cltq
lea    (%r14,%rax,1),%rbp
mov    %rbp,0x10(%r13,%rcx,8)
movslq %edi,%rdi
lea    (%r14,%rdi,1),%rbp
mov    %rbp,0x18(%r13,%rcx,8)
movslq %edx,%rdx
lea    (%r14,%rdx,1),%rbp
mov    %rbp,0x20(%r13,%rcx,8)
add    $0x4,%rcx
add    %esi,%edx
add    %esi,%edi
add    %esi,%ebx
add    %esi,%eax
cmp    %rcx,%r9
jne    11d0 <pm_allocarray+0xb0>
add    $0x1,%rcx
mov    %r10d,%ebp
test   %r8,%r8
je     1257 <pm_allocarray+0x137>
lea    0x0(,%rcx,8),%rax
add    %r13,%rax
imul   %ebp,%r15d
imul   %r15d,%ecx
xor    %edx,%edx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movslq %ecx,%rcx
lea    (%r14,%rcx,1),%rsi
mov    %rsi,(%rax,%rdx,8)
add    $0x1,%rdx
add    %r15d,%ecx
cmp    %rdx,%r8
jne    1240 <pm_allocarray+0x120>
mov    %r13,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [34 x i8] c"out of memory allocating an array\00"
define i8** @pm_allocarray(i32 %0, i32 %1, i32 %2) {
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca i8**
%8 = alloca i32
store i32 %0, i32* %4
store i32 %1, i32* %5
store i32 %2, i32* %6
%9 = load i32, i32* %5
%10 = sext i32 %9 to i64
%11 = mul i64 %10, 8
%12 = call i8* @malloc(i64 %11)
%13 = bitcast i8* %12 to i8**
store i8** %13, i8*** %7
%14 = load i8**, i8*** %7
%15 = icmp eq i8** %14, null
br i1 %15, label %16, label %18
16: ; preds = %3
%17 = call i32 (i8*, ...) bitcast (i32 (...)* @pm_error to i32 (i8*, ...)*)(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
br label %18
18: ; preds = %16, %3
%19 = load i32, i32* %5
%20 = load i32, i32* %4
%21 = mul nsw i32 %19, %20
%22 = load i32, i32* %6
%23 = mul nsw i32 %21, %22
%24 = sext i32 %23 to i64
%25 = call i8* @malloc(i64 %24)
%26 = load i8**, i8*** %7
%27 = getelementptr inbounds i8*, i8** %26, i64 0
store i8* %25, i8** %27
%28 = load i8**, i8*** %7
%29 = getelementptr inbounds i8*, i8** %28, i64 0
%30 = load i8*, i8** %29
%31 = icmp eq i8* %30, null
br i1 %31, label %32, label %34
32: ; preds = %18
%33 = call i32 (i8*, ...) bitcast (i32 (...)* @pm_error to i32 (i8*, ...)*)(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
br label %34
34: ; preds = %32, %18
store i32 1, i32* %8
br label %35
35: ; preds = %54, %34
%36 = load i32, i32* %8
%37 = load i32, i32* %5
%38 = icmp slt i32 %36, %37
br i1 %38, label %39, label %57
39: ; preds = %35
%40 = load i8**, i8*** %7
%41 = getelementptr inbounds i8*, i8** %40, i64 0
%42 = load i8*, i8** %41
%43 = load i32, i32* %8
%44 = load i32, i32* %4
%45 = mul nsw i32 %43, %44
%46 = load i32, i32* %6
%47 = mul nsw i32 %45, %46
%48 = sext i32 %47 to i64
%49 = getelementptr inbounds i8, i8* %42, i64 %48
%50 = load i8**, i8*** %7
%51 = load i32, i32* %8
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds i8*, i8** %50, i64 %52
store i8* %49, i8** %53
br label %54
54: ; preds = %39
%55 = load i32, i32* %8
%56 = add nsw i32 %55, 1
store i32 %56, i32* %8
br label %35
57: ; preds = %35
%58 = load i8**, i8*** %7
ret i8** %58
}

LLVM IR (-O2):
@.str = [34 x i8] c"out of memory allocating an array\00"
define i8** @pm_allocarray(i32 %0, i32 %1, i32 %2) {
%4 = sext i32 %1 to i64
%5 = shl nsw i64 %4, 3
%6 = tail call i8* @malloc(i64 %5)
%7 = bitcast i8* %6 to i8**
%8 = icmp eq i8* %6, null
br i1 %8, label %9, label %11
9: ; preds = %3
%10 = tail call i32 (i8*, ...) bitcast (i32 (...)* @pm_error to i32 (i8*, ...)*)(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
br label %11
11: ; preds = %9, %3
%12 = mul i32 %2, %0
%13 = mul i32 %12, %1
%14 = sext i32 %13 to i64
%15 = tail call i8* @malloc(i64 %14)
store i8* %15, i8** %7
%16 = icmp eq i8* %15, null
br i1 %16, label %17, label %19
17: ; preds = %11
%18 = tail call i32 (i8*, ...) bitcast (i32 (...)* @pm_error to i32 (i8*, ...)*)(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
br label %19
19: ; preds = %17, %11
%20 = icmp sgt i32 %1, 1
br i1 %20, label %21, label %72
21: ; preds = %19
%22 = zext i32 %1 to i64
%23 = add nsw i64 %22, -1
%24 = add nsw i64 %22, -2
%25 = and i64 %23, 3
%26 = icmp ult i64 %24, 3
br i1 %26, label %58, label %27
27: ; preds = %21
%28 = and i64 %23, -4
br label %29
29: ; preds = %29, %27
%30 = phi i64 [ 1, %27 ], [ %55, %29 ]
%31 = phi i64 [ 0, %27 ], [ %56, %29 ]
%32 = trunc i64 %30 to i32
%33 = mul i32 %12, %32
%34 = sext i32 %33 to i64
%35 = getelementptr inbounds i8, i8* %15, i64 %34
%36 = getelementptr inbounds i8*, i8** %7, i64 %30
store i8* %35, i8** %36
%37 = add nuw nsw i64 %30, 1
%38 = trunc i64 %37 to i32
%39 = mul i32 %12, %38
%40 = sext i32 %39 to i64
%41 = getelementptr inbounds i8, i8* %15, i64 %40
%42 = getelementptr inbounds i8*, i8** %7, i64 %37
store i8* %41, i8** %42
%43 = add nuw nsw i64 %30, 2
%44 = trunc i64 %43 to i32
%45 = mul i32 %12, %44
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds i8, i8* %15, i64 %46
%48 = getelementptr inbounds i8*, i8** %7, i64 %43
store i8* %47, i8** %48
%49 = add nuw nsw i64 %30, 3
%50 = trunc i64 %49 to i32
%51 = mul i32 %12, %50
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds i8, i8* %15, i64 %52
%54 = getelementptr inbounds i8*, i8** %7, i64 %49
store i8* %53, i8** %54
%55 = add nuw nsw i64 %30, 4
%56 = add i64 %31, 4
%57 = icmp eq i64 %56, %28
br i1 %57, label %58, label %29
58: ; preds = %29, %21
%59 = phi i64 [ 1, %21 ], [ %55, %29 ]
%60 = icmp eq i64 %25, 0
br i1 %60, label %72, label %61
61: ; preds = %58, %61
%62 = phi i64 [ %69, %61 ], [ %59, %58 ]
%63 = phi i64 [ %70, %61 ], [ 0, %58 ]
%64 = trunc i64 %62 to i32
%65 = mul i32 %12, %64
%66 = sext i32 %65 to i64
%67 = getelementptr inbounds i8, i8* %15, i64 %66
%68 = getelementptr inbounds i8*, i8** %7, i64 %62
store i8* %67, i8** %68
%69 = add nuw nsw i64 %62, 1
%70 = add i64 %63, 1
%71 = icmp eq i64 %70, %25
br i1 %71, label %72, label %61
72: ; preds = %58, %61, %19
ret i8** %7
}