#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
unsigned char ***select_font(int);
int put_char(unsigned char c, int x, int y, int fg_color, int bg_color,
             int overwrite, int which_font, unsigned char *buffer) {
  int xx, yy;
  int output_pointer;
  unsigned char(*font)[256][16];
  font = select_font(which_font);
  output_pointer = (y * 640) + x;
  for (yy = 0; yy < 16; yy++) {
    for (xx = 0; xx < 8; xx++) {
      if ((*font)[c][yy] & (1 << (8 - xx))) {
        buffer[output_pointer] = fg_color;
      } else if (overwrite) {
        buffer[output_pointer] = bg_color;
      }
      output_pointer++;
    }
    output_pointer += (640 - 8);
  }
  return 0;
}


x86 assembly (clang, -O0):
<put_char>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %dil,%al
mov    0x18(%rbp),%rdi
mov    0x10(%rbp),%edi
mov    %al,-0x1(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
mov    %ecx,-0x10(%rbp)
mov    %r8d,-0x14(%rbp)
mov    %r9d,-0x18(%rbp)
mov    0x10(%rbp),%edi
call   1030 <select_font@plt>
mov    %rax,-0x30(%rbp)
imul   $0x280,-0xc(%rbp),%eax
add    -0x8(%rbp),%eax
mov    %eax,-0x24(%rbp)
movl   $0x0,-0x20(%rbp)
cmpl   $0x10,-0x20(%rbp)
jge    1208 <put_char+0xf8>
movl   $0x0,-0x1c(%rbp)
cmpl   $0x8,-0x1c(%rbp)
jge    11ef <put_char+0xdf>
mov    -0x30(%rbp),%rax
movzbl -0x1(%rbp),%ecx
shl    $0x4,%rcx
add    %rcx,%rax
movslq -0x20(%rbp),%rcx
movzbl (%rax,%rcx,1),%eax
mov    $0x8,%ecx
sub    -0x1c(%rbp),%ecx
mov    $0x1,%edx
shl    %cl,%edx
mov    %edx,%ecx
and    %ecx,%eax
cmp    $0x0,%eax
je     11b9 <put_char+0xa9>
mov    -0x10(%rbp),%eax
mov    %al,%dl
mov    0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
jmp    11d8 <put_char+0xc8>
cmpl   $0x0,-0x18(%rbp)
je     11d3 <put_char+0xc3>
mov    -0x14(%rbp),%eax
mov    %al,%dl
mov    0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
jmp    11d8 <put_char+0xc8>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1167 <put_char+0x57>
mov    -0x24(%rbp),%eax
add    $0x278,%eax
mov    %eax,-0x24(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1156 <put_char+0x46>
xor    %eax,%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<put_char>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %r9d,%r14d
mov    %r8d,%ebp
mov    %ecx,%r13d
mov    %edx,%r15d
mov    %esi,0x4(%rsp)
mov    %edi,%ebx
mov    0x48(%rsp),%r12
mov    0x40(%rsp),%edi
call   1030 <select_font@plt>
lea    (%r15,%r15,4),%ecx
shl    $0x7,%ecx
add    0x4(%rsp),%ecx
mov    %ebx,%edx
shl    $0x4,%rdx
add    %rax,%rdx
xor    %eax,%eax
jmp    1178 <put_char+0x68>
mov    %r13d,%ebx
cs nopw 0x0(%rax,%rax,1)
mov    %bl,(%r12,%rcx,1)
add    $0x279,%ecx
add    $0x1,%rax
cmp    $0x10,%rax
je     12d9 <put_char+0x1c9>
movslq %ecx,%rcx
test   %r14d,%r14d
je     11a0 <put_char+0x90>
mov    %bpl,(%r12,%rcx,1)
cmpb   $0x0,(%rdx,%rax,1)
js     11d0 <put_char+0xc0>
mov    %bpl,0x1(%r12,%rcx,1)
testb  $0x40,(%rdx,%rax,1)
je     11b1 <put_char+0xa1>
mov    %r13b,0x2(%r12,%rcx,1)
jmp    11b9 <put_char+0xa9>
nopl   0x0(%rax)
cmpb   $0x0,(%rdx,%rax,1)
js     11d0 <put_char+0xc0>
testb  $0x40,(%rdx,%rax,1)
jne    11de <put_char+0xce>
test   %r14d,%r14d
je     1203 <put_char+0xf3>
lea    0x2(%rcx),%rsi
mov    %bpl,(%r12,%rsi,1)
lea    0x3(%rcx),%rsi
testb  $0x20,(%rdx,%rax,1)
je     11f2 <put_char+0xe2>
jmp    1210 <put_char+0x100>
cs nopw 0x0(%rax,%rax,1)
nop
lea    0x1(%rcx),%rsi
mov    %r13b,(%r12,%rsi,1)
testb  $0x40,(%rdx,%rax,1)
je     11ac <put_char+0x9c>
mov    %r13b,0x2(%r12,%rcx,1)
lea    0x3(%rcx),%rsi
testb  $0x20,(%rdx,%rax,1)
jne    1210 <put_char+0x100>
test   %r14d,%r14d
je     1214 <put_char+0x104>
mov    %bpl,(%r12,%rsi,1)
testb  $0x10,(%rdx,%rax,1)
je     121f <put_char+0x10f>
mov    %r13b,0x4(%r12,%rcx,1)
jmp    1227 <put_char+0x117>
testb  $0x20,(%rdx,%rax,1)
je     1214 <put_char+0x104>
lea    0x3(%rcx),%rsi
nopl   (%rax)
mov    %r13b,(%r12,%rsi,1)
testb  $0x10,(%rdx,%rax,1)
jne    1240 <put_char+0x130>
test   %r14d,%r14d
je     1265 <put_char+0x155>
lea    0x4(%rcx),%rsi
mov    %bpl,(%r12,%rsi,1)
lea    0x5(%rcx),%rsi
testb  $0x8,(%rdx,%rax,1)
je     1254 <put_char+0x144>
jmp    1270 <put_char+0x160>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    %r13b,0x4(%r12,%rcx,1)
lea    0x5(%rcx),%rsi
testb  $0x8,(%rdx,%rax,1)
jne    1270 <put_char+0x160>
test   %r14d,%r14d
je     1274 <put_char+0x164>
mov    %bpl,(%r12,%rsi,1)
testb  $0x4,(%rdx,%rax,1)
je     127f <put_char+0x16f>
mov    %r13b,0x6(%r12,%rcx,1)
jmp    1287 <put_char+0x177>
testb  $0x8,(%rdx,%rax,1)
je     1274 <put_char+0x164>
lea    0x5(%rcx),%rsi
nop
mov    %r13b,(%r12,%rsi,1)
testb  $0x4,(%rdx,%rax,1)
jne    12a0 <put_char+0x190>
test   %r14d,%r14d
je     12c3 <put_char+0x1b3>
lea    0x6(%rcx),%rsi
mov    %bpl,(%r12,%rsi,1)
add    $0x7,%rcx
testb  $0x2,(%rdx,%rax,1)
mov    %r13d,%ebx
jne    1160 <put_char+0x50>
jmp    12bc <put_char+0x1ac>
nopw   0x0(%rax,%rax,1)
mov    %r13b,0x6(%r12,%rcx,1)
add    $0x7,%rcx
testb  $0x2,(%rdx,%rax,1)
jne    1153 <put_char+0x43>
test   %r14d,%r14d
je     1164 <put_char+0x54>
mov    %ebp,%ebx
jmp    1160 <put_char+0x50>
add    $0x7,%rcx
testb  $0x2,(%rdx,%rax,1)
mov    %r13d,%ebx
jne    1160 <put_char+0x50>
jmp    1164 <put_char+0x54>
xor    %eax,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i32 @put_char(i8 zeroext %0, i32 %1, i32 %2, i32 %3, i32 %4, i32 %5, i32 %6, i8* %7) {
%9 = alloca i8
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca i32
%15 = alloca i32
%16 = alloca i8*
%17 = alloca i32
%18 = alloca i32
%19 = alloca i32
%20 = alloca [256 x [16 x i8]]*
store i8 %0, i8* %9
store i32 %1, i32* %10
store i32 %2, i32* %11
store i32 %3, i32* %12
store i32 %4, i32* %13
store i32 %5, i32* %14
store i32 %6, i32* %15
store i8* %7, i8** %16
%21 = load i32, i32* %15
%22 = call i8*** @select_font(i32 %21)
%23 = bitcast i8*** %22 to [256 x [16 x i8]]*
store [256 x [16 x i8]]* %23, [256 x [16 x i8]]** %20
%24 = load i32, i32* %11
%25 = mul nsw i32 %24, 640
%26 = load i32, i32* %10
%27 = add nsw i32 %25, %26
store i32 %27, i32* %19
store i32 0, i32* %18
br label %28
28: ; preds = %77, %8
%29 = load i32, i32* %18
%30 = icmp slt i32 %29, 16
br i1 %30, label %31, label %80
31: ; preds = %28
store i32 0, i32* %17
br label %32
32: ; preds = %71, %31
%33 = load i32, i32* %17
%34 = icmp slt i32 %33, 8
br i1 %34, label %35, label %74
35: ; preds = %32
%36 = load [256 x [16 x i8]]*, [256 x [16 x i8]]** %20
%37 = load i8, i8* %9
%38 = zext i8 %37 to i64
%39 = getelementptr inbounds [256 x [16 x i8]], [256 x [16 x i8]]* %36, i64 0, i64 %38
%40 = load i32, i32* %18
%41 = sext i32 %40 to i64
%42 = getelementptr inbounds [16 x i8], [16 x i8]* %39, i64 0, i64 %41
%43 = load i8, i8* %42
%44 = zext i8 %43 to i32
%45 = load i32, i32* %17
%46 = sub nsw i32 8, %45
%47 = shl i32 1, %46
%48 = and i32 %44, %47
%49 = icmp ne i32 %48, 0
br i1 %49, label %50, label %57
50: ; preds = %35
%51 = load i32, i32* %12
%52 = trunc i32 %51 to i8
%53 = load i8*, i8** %16
%54 = load i32, i32* %19
%55 = sext i32 %54 to i64
%56 = getelementptr inbounds i8, i8* %53, i64 %55
store i8 %52, i8* %56
br label %68
57: ; preds = %35
%58 = load i32, i32* %14
%59 = icmp ne i32 %58, 0
br i1 %59, label %60, label %67
60: ; preds = %57
%61 = load i32, i32* %13
%62 = trunc i32 %61 to i8
%63 = load i8*, i8** %16
%64 = load i32, i32* %19
%65 = sext i32 %64 to i64
%66 = getelementptr inbounds i8, i8* %63, i64 %65
store i8 %62, i8* %66
br label %67
67: ; preds = %60, %57
br label %68
68: ; preds = %67, %50
%69 = load i32, i32* %19
%70 = add nsw i32 %69, 1
store i32 %70, i32* %19
br label %71
71: ; preds = %68
%72 = load i32, i32* %17
%73 = add nsw i32 %72, 1
store i32 %73, i32* %17
br label %32
74: ; preds = %32
%75 = load i32, i32* %19
%76 = add nsw i32 %75, 632
store i32 %76, i32* %19
br label %77
77: ; preds = %74
%78 = load i32, i32* %18
%79 = add nsw i32 %78, 1
store i32 %79, i32* %18
br label %28
80: ; preds = %28
ret i32 0
}

LLVM IR (-O2):
define i32 @put_char(i8 zeroext %0, i32 %1, i32 %2, i32 %3, i32 %4, i32 %5, i32 %6, i8* nocapture writeonly %7) {
%9 = tail call i8*** @select_font(i32 %6)
%10 = bitcast i8*** %9 to [256 x [16 x i8]]*
%11 = mul nsw i32 %2, 640
%12 = add nsw i32 %11, %1
%13 = zext i8 %0 to i64
%14 = trunc i32 %3 to i8
%15 = icmp eq i32 %5, 0
%16 = trunc i32 %4 to i8
br label %17
17: ; preds = %159, %8
%18 = phi i64 [ 0, %8 ], [ %163, %159 ]
%19 = phi i32 [ %12, %8 ], [ %162, %159 ]
%20 = getelementptr inbounds [256 x [16 x i8]], [256 x [16 x i8]]* %10, i64 0, i64 %13, i64 %18
%21 = sext i32 %19 to i64
br i1 %15, label %22, label %26
22: ; preds = %17
%23 = add nsw i64 %21, 1
%24 = load i8, i8* %20
%25 = icmp sgt i8 %24, -1
br i1 %25, label %34, label %31
26: ; preds = %17
%27 = getelementptr inbounds i8, i8* %7, i64 %21
store i8 %16, i8* %27
%28 = add nsw i64 %21, 1
%29 = load i8, i8* %20
%30 = icmp sgt i8 %29, -1
br i1 %30, label %39, label %31
31: ; preds = %26, %22
%32 = phi i64 [ %28, %26 ], [ %23, %22 ]
%33 = getelementptr inbounds i8, i8* %7, i64 %32
store i8 %14, i8* %33
br label %34
34: ; preds = %22, %31
%35 = add nsw i64 %21, 2
%36 = load i8, i8* %20
%37 = and i8 %36, 64
%38 = icmp eq i8 %37, 0
br i1 %38, label %45, label %46
39: ; preds = %26
%40 = getelementptr inbounds i8, i8* %7, i64 %28
store i8 %16, i8* %40
%41 = add nsw i64 %21, 2
%42 = load i8, i8* %20
%43 = and i8 %42, 64
%44 = icmp eq i8 %43, 0
br i1 %44, label %63, label %52
45: ; preds = %34
br i1 %15, label %58, label %63
46: ; preds = %34
%47 = getelementptr inbounds i8, i8* %7, i64 %35
store i8 %14, i8* %47
%48 = add nsw i64 %21, 3
%49 = load i8, i8* %20
%50 = and i8 %49, 32
%51 = icmp eq i8 %50, 0
br i1 %51, label %73, label %70
52: ; preds = %39
%53 = getelementptr inbounds i8, i8* %7, i64 %41
store i8 %14, i8* %53
%54 = add nsw i64 %21, 3
%55 = load i8, i8* %20
%56 = and i8 %55, 32
%57 = icmp eq i8 %56, 0
br i1 %57, label %79, label %70
58: ; preds = %45
%59 = add nsw i64 %21, 3
%60 = load i8, i8* %20
%61 = and i8 %60, 32
%62 = icmp eq i8 %61, 0
br i1 %62, label %74, label %70
63: ; preds = %45, %39
%64 = phi i64 [ %35, %45 ], [ %41, %39 ]
%65 = getelementptr inbounds i8, i8* %7, i64 %64
store i8 %16, i8* %65
%66 = add nsw i64 %21, 3
%67 = load i8, i8* %20
%68 = and i8 %67, 32
%69 = icmp eq i8 %68, 0
br i1 %69, label %79, label %70
70: ; preds = %52, %58, %63, %46
%71 = phi i64 [ %66, %63 ], [ %48, %46 ], [ %59, %58 ], [ %54, %52 ]
%72 = getelementptr inbounds i8, i8* %7, i64 %71
store i8 %14, i8* %72
br label %74
73: ; preds = %46
br i1 %15, label %74, label %79
74: ; preds = %58, %73, %70
%75 = add nsw i64 %21, 4
%76 = load i8, i8* %20
%77 = and i8 %76, 16
%78 = icmp eq i8 %77, 0
br i1 %78, label %86, label %87
79: ; preds = %52, %73, %63
%80 = phi i64 [ %48, %73 ], [ %66, %63 ], [ %54, %52 ]
%81 = getelementptr inbounds i8, i8* %7, i64 %80
store i8 %16, i8* %81
%82 = add nsw i64 %21, 4
%83 = load i8, i8* %20
%84 = and i8 %83, 16
%85 = icmp eq i8 %84, 0
br i1 %85, label %104, label %93
86: ; preds = %74
br i1 %15, label %99, label %104
87: ; preds = %74
%88 = getelementptr inbounds i8, i8* %7, i64 %75
store i8 %14, i8* %88
%89 = add nsw i64 %21, 5
%90 = load i8, i8* %20
%91 = and i8 %90, 8
%92 = icmp eq i8 %91, 0
br i1 %92, label %114, label %111
93: ; preds = %79
%94 = getelementptr inbounds i8, i8* %7, i64 %82
store i8 %14, i8* %94
%95 = add nsw i64 %21, 5
%96 = load i8, i8* %20
%97 = and i8 %96, 8
%98 = icmp eq i8 %97, 0
br i1 %98, label %120, label %111
99: ; preds = %86
%100 = add nsw i64 %21, 5
%101 = load i8, i8* %20
%102 = and i8 %101, 8
%103 = icmp eq i8 %102, 0
br i1 %103, label %115, label %111
104: ; preds = %86, %79
%105 = phi i64 [ %75, %86 ], [ %82, %79 ]
%106 = getelementptr inbounds i8, i8* %7, i64 %105
store i8 %16, i8* %106
%107 = add nsw i64 %21, 5
%108 = load i8, i8* %20
%109 = and i8 %108, 8
%110 = icmp eq i8 %109, 0
br i1 %110, label %120, label %111
111: ; preds = %93, %99, %104, %87
%112 = phi i64 [ %107, %104 ], [ %89, %87 ], [ %100, %99 ], [ %95, %93 ]
%113 = getelementptr inbounds i8, i8* %7, i64 %112
store i8 %14, i8* %113
br label %115
114: ; preds = %87
br i1 %15, label %115, label %120
115: ; preds = %99, %114, %111
%116 = add nsw i64 %21, 6
%117 = load i8, i8* %20
%118 = and i8 %117, 4
%119 = icmp eq i8 %118, 0
br i1 %119, label %127, label %128
120: ; preds = %93, %114, %104
%121 = phi i64 [ %89, %114 ], [ %107, %104 ], [ %95, %93 ]
%122 = getelementptr inbounds i8, i8* %7, i64 %121
store i8 %16, i8* %122
%123 = add nsw i64 %21, 6
%124 = load i8, i8* %20
%125 = and i8 %124, 4
%126 = icmp eq i8 %125, 0
br i1 %126, label %145, label %134
127: ; preds = %115
br i1 %15, label %140, label %145
128: ; preds = %115
%129 = getelementptr inbounds i8, i8* %7, i64 %116
store i8 %14, i8* %129
%130 = add nsw i64 %21, 7
%131 = load i8, i8* %20
%132 = and i8 %131, 2
%133 = icmp eq i8 %132, 0
br i1 %133, label %152, label %155
134: ; preds = %120
%135 = getelementptr inbounds i8, i8* %7, i64 %123
store i8 %14, i8* %135
%136 = add nsw i64 %21, 7
%137 = load i8, i8* %20
%138 = and i8 %137, 2
%139 = icmp eq i8 %138, 0
br i1 %139, label %153, label %155
140: ; preds = %127
%141 = add nsw i64 %21, 7
%142 = load i8, i8* %20
%143 = and i8 %142, 2
%144 = icmp eq i8 %143, 0
br i1 %144, label %159, label %155
145: ; preds = %127, %120
%146 = phi i64 [ %116, %127 ], [ %123, %120 ]
%147 = getelementptr inbounds i8, i8* %7, i64 %146
store i8 %16, i8* %147
%148 = add nsw i64 %21, 7
%149 = load i8, i8* %20
%150 = and i8 %149, 2
%151 = icmp eq i8 %150, 0
br i1 %151, label %153, label %155
152: ; preds = %128
br i1 %15, label %159, label %153
153: ; preds = %134, %145, %152
%154 = phi i64 [ %130, %152 ], [ %148, %145 ], [ %136, %134 ]
br label %155
155: ; preds = %128, %145, %140, %134, %153
%156 = phi i64 [ %154, %153 ], [ %148, %145 ], [ %130, %128 ], [ %141, %140 ], [ %136, %134 ]
%157 = phi i8 [ %16, %153 ], [ %14, %145 ], [ %14, %128 ], [ %14, %140 ], [ %14, %134 ]
%158 = getelementptr inbounds i8, i8* %7, i64 %156
store i8 %157, i8* %158
br label %159
159: ; preds = %155, %140, %152
%160 = phi i64 [ %130, %152 ], [ %141, %140 ], [ %156, %155 ]
%161 = trunc i64 %160 to i32
%162 = add nsw i32 %161, 633
%163 = add nuw nsw i64 %18, 1
%164 = icmp eq i64 %163, 16
br i1 %164, label %165, label %17
165: ; preds = %159
ret i32 0
}