int setchar(linep, glyph)
char *linep;
char glyph[7];
{
  register int mask, w, c, morebits;
  w = 0;
  morebits = glyph[0] | glyph[1] | glyph[2] | glyph[3] | glyph[4] | glyph[5] |
             glyph[6];
  for (mask = 0x80; morebits && mask != 0; mask >>= 1) {
    c = 0;
    if (glyph[0] & mask)
      c |= 0x01;
    if (glyph[1] & mask)
      c |= 0x02;
    if (glyph[2] & mask)
      c |= 0x04;
    if (glyph[3] & mask)
      c |= 0x08;
    if (glyph[4] & mask)
      c |= 0x10;
    if (glyph[5] & mask)
      c |= 0x20;
    if (glyph[6] & mask)
      c |= 0x40;
    *linep++ = c;
    w++;
    morebits &= ~mask;
  }
  return w;
}


x86 assembly (clang, -O0):
<setchar>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movl   $0x0,-0x18(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
mov    -0x10(%rbp),%rcx
movsbl 0x1(%rcx),%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movsbl 0x2(%rcx),%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movsbl 0x3(%rcx),%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movsbl 0x4(%rcx),%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movsbl 0x5(%rcx),%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movsbl 0x6(%rcx),%ecx
or     %ecx,%eax
mov    %eax,-0x20(%rbp)
movl   $0x80,-0x14(%rbp)
xor    %eax,%eax
cmpl   $0x0,-0x20(%rbp)
mov    %al,-0x21(%rbp)
je     1179 <setchar+0x79>
cmpl   $0x0,-0x14(%rbp)
setne  %al
mov    %al,-0x21(%rbp)
mov    -0x21(%rbp),%al
test   $0x1,%al
jne    1189 <setchar+0x89>
jmp    1293 <setchar+0x193>
movl   $0x0,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
and    -0x14(%rbp),%eax
cmp    $0x0,%eax
je     11ac <setchar+0xac>
mov    -0x1c(%rbp),%eax
or     $0x1,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
movsbl 0x1(%rax),%eax
and    -0x14(%rbp),%eax
cmp    $0x0,%eax
je     11c9 <setchar+0xc9>
mov    -0x1c(%rbp),%eax
or     $0x2,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
movsbl 0x2(%rax),%eax
and    -0x14(%rbp),%eax
cmp    $0x0,%eax
je     11e6 <setchar+0xe6>
mov    -0x1c(%rbp),%eax
or     $0x4,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
movsbl 0x3(%rax),%eax
and    -0x14(%rbp),%eax
cmp    $0x0,%eax
je     1203 <setchar+0x103>
mov    -0x1c(%rbp),%eax
or     $0x8,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
movsbl 0x4(%rax),%eax
and    -0x14(%rbp),%eax
cmp    $0x0,%eax
je     1220 <setchar+0x120>
mov    -0x1c(%rbp),%eax
or     $0x10,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
movsbl 0x5(%rax),%eax
and    -0x14(%rbp),%eax
cmp    $0x0,%eax
je     123d <setchar+0x13d>
mov    -0x1c(%rbp),%eax
or     $0x20,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
movsbl 0x6(%rax),%eax
and    -0x14(%rbp),%eax
cmp    $0x0,%eax
je     125a <setchar+0x15a>
mov    -0x1c(%rbp),%eax
or     $0x40,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
mov    %al,%cl
mov    -0x8(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x8(%rbp)
mov    %cl,(%rax)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
mov    -0x14(%rbp),%eax
xor    $0xffffffff,%eax
and    -0x20(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0x14(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1160 <setchar+0x60>
mov    -0x18(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<setchar>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
mov    (%rsi),%bl
mov    0x1(%rsi),%r14b
mov    %r14d,%eax
or     %bl,%al
mov    0x2(%rsi),%r15b
mov    0x3(%rsi),%r10b
mov    %r15d,%ecx
or     %r10b,%cl
or     %al,%cl
mov    0x4(%rsi),%r11b
mov    0x5(%rsi),%r8b
mov    %r11d,%eax
or     %r8b,%al
or     %cl,%al
mov    0x6(%rsi),%r9b
or     %r9b,%al
je     120d <setchar+0x10d>
movsbl %al,%edx
mov    $0x80,%r12d
xor    %eax,%eax
nopl   0x0(%rax,%rax,1)
movzbl %bl,%ebx
xor    %ebp,%ebp
test   %ebx,%r12d
setne  %bpl
movzbl %r14b,%ebx
lea    0x2(%rbp),%r14d
test   %ebx,%r12d
movzbl %r15b,%r15d
movzbl %r14b,%ebx
cmove  %ebp,%ebx
lea    0x4(%rbx),%ebp
test   %r15d,%r12d
movzbl %bpl,%ebp
cmove  %ebx,%ebp
movzbl %r10b,%r10d
mov    %ebp,%ebx
or     $0x8,%bl
test   %r10d,%r12d
movzbl %r11b,%r10d
movzbl %bl,%ebx
cmove  %ebp,%ebx
mov    %ebx,%ecx
or     $0x10,%cl
test   %r10d,%r12d
movzbl %cl,%ecx
cmove  %ebx,%ecx
movzbl %r8b,%ebp
mov    %ecx,%ebx
or     $0x20,%bl
test   %ebp,%r12d
movzbl %r9b,%ebp
movzbl %bl,%ebx
cmove  %ecx,%ebx
mov    %ebx,%ecx
or     $0x40,%cl
test   %ebp,%r12d
movzbl %cl,%ecx
cmove  %ebx,%ecx
mov    %edx,%ebp
mov    %cl,(%rdi,%rax,1)
mov    %r12d,%edx
not    %edx
and    %ebp,%edx
je     1208 <setchar+0x108>
cmp    $0x2,%r12d
jb     1208 <setchar+0x108>
shr    %r12d
movzbl (%rsi),%ebx
movzbl 0x1(%rsi),%r14d
movzbl 0x2(%rsi),%r15d
movzbl 0x3(%rsi),%r10d
movzbl 0x4(%rsi),%r11d
movzbl 0x5(%rsi),%r8d
movzbl 0x6(%rsi),%r9d
add    $0x1,%rax
jmp    1150 <setchar+0x50>
add    $0x1,%eax
jmp    120f <setchar+0x10f>
xor    %eax,%eax
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i32 @setchar(i8* %0, i8* %1) {
%3 = alloca i8*
%4 = alloca i8*
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
store i8* %0, i8** %3
store i8* %1, i8** %4
store i32 0, i32* %6
%9 = load i8*, i8** %4
%10 = getelementptr inbounds i8, i8* %9, i64 0
%11 = load i8, i8* %10
%12 = sext i8 %11 to i32
%13 = load i8*, i8** %4
%14 = getelementptr inbounds i8, i8* %13, i64 1
%15 = load i8, i8* %14
%16 = sext i8 %15 to i32
%17 = or i32 %12, %16
%18 = load i8*, i8** %4
%19 = getelementptr inbounds i8, i8* %18, i64 2
%20 = load i8, i8* %19
%21 = sext i8 %20 to i32
%22 = or i32 %17, %21
%23 = load i8*, i8** %4
%24 = getelementptr inbounds i8, i8* %23, i64 3
%25 = load i8, i8* %24
%26 = sext i8 %25 to i32
%27 = or i32 %22, %26
%28 = load i8*, i8** %4
%29 = getelementptr inbounds i8, i8* %28, i64 4
%30 = load i8, i8* %29
%31 = sext i8 %30 to i32
%32 = or i32 %27, %31
%33 = load i8*, i8** %4
%34 = getelementptr inbounds i8, i8* %33, i64 5
%35 = load i8, i8* %34
%36 = sext i8 %35 to i32
%37 = or i32 %32, %36
%38 = load i8*, i8** %4
%39 = getelementptr inbounds i8, i8* %38, i64 6
%40 = load i8, i8* %39
%41 = sext i8 %40 to i32
%42 = or i32 %37, %41
store i32 %42, i32* %8
store i32 128, i32* %5
br label %43
43: ; preds = %139, %2
%44 = load i32, i32* %8
%45 = icmp ne i32 %44, 0
br i1 %45, label %46, label %49
46: ; preds = %43
%47 = load i32, i32* %5
%48 = icmp ne i32 %47, 0
br label %49
49: ; preds = %46, %43
%50 = phi i1 [ false, %43 ], [ %48, %46 ]
br i1 %50, label %51, label %142
51: ; preds = %49
store i32 0, i32* %7
%52 = load i8*, i8** %4
%53 = getelementptr inbounds i8, i8* %52, i64 0
%54 = load i8, i8* %53
%55 = sext i8 %54 to i32
%56 = load i32, i32* %5
%57 = and i32 %55, %56
%58 = icmp ne i32 %57, 0
br i1 %58, label %59, label %62
59: ; preds = %51
%60 = load i32, i32* %7
%61 = or i32 %60, 1
store i32 %61, i32* %7
br label %62
62: ; preds = %59, %51
%63 = load i8*, i8** %4
%64 = getelementptr inbounds i8, i8* %63, i64 1
%65 = load i8, i8* %64
%66 = sext i8 %65 to i32
%67 = load i32, i32* %5
%68 = and i32 %66, %67
%69 = icmp ne i32 %68, 0
br i1 %69, label %70, label %73
70: ; preds = %62
%71 = load i32, i32* %7
%72 = or i32 %71, 2
store i32 %72, i32* %7
br label %73
73: ; preds = %70, %62
%74 = load i8*, i8** %4
%75 = getelementptr inbounds i8, i8* %74, i64 2
%76 = load i8, i8* %75
%77 = sext i8 %76 to i32
%78 = load i32, i32* %5
%79 = and i32 %77, %78
%80 = icmp ne i32 %79, 0
br i1 %80, label %81, label %84
81: ; preds = %73
%82 = load i32, i32* %7
%83 = or i32 %82, 4
store i32 %83, i32* %7
br label %84
84: ; preds = %81, %73
%85 = load i8*, i8** %4
%86 = getelementptr inbounds i8, i8* %85, i64 3
%87 = load i8, i8* %86
%88 = sext i8 %87 to i32
%89 = load i32, i32* %5
%90 = and i32 %88, %89
%91 = icmp ne i32 %90, 0
br i1 %91, label %92, label %95
92: ; preds = %84
%93 = load i32, i32* %7
%94 = or i32 %93, 8
store i32 %94, i32* %7
br label %95
95: ; preds = %92, %84
%96 = load i8*, i8** %4
%97 = getelementptr inbounds i8, i8* %96, i64 4
%98 = load i8, i8* %97
%99 = sext i8 %98 to i32
%100 = load i32, i32* %5
%101 = and i32 %99, %100
%102 = icmp ne i32 %101, 0
br i1 %102, label %103, label %106
103: ; preds = %95
%104 = load i32, i32* %7
%105 = or i32 %104, 16
store i32 %105, i32* %7
br label %106
106: ; preds = %103, %95
%107 = load i8*, i8** %4
%108 = getelementptr inbounds i8, i8* %107, i64 5
%109 = load i8, i8* %108
%110 = sext i8 %109 to i32
%111 = load i32, i32* %5
%112 = and i32 %110, %111
%113 = icmp ne i32 %112, 0
br i1 %113, label %114, label %117
114: ; preds = %106
%115 = load i32, i32* %7
%116 = or i32 %115, 32
store i32 %116, i32* %7
br label %117
117: ; preds = %114, %106
%118 = load i8*, i8** %4
%119 = getelementptr inbounds i8, i8* %118, i64 6
%120 = load i8, i8* %119
%121 = sext i8 %120 to i32
%122 = load i32, i32* %5
%123 = and i32 %121, %122
%124 = icmp ne i32 %123, 0
br i1 %124, label %125, label %128
125: ; preds = %117
%126 = load i32, i32* %7
%127 = or i32 %126, 64
store i32 %127, i32* %7
br label %128
128: ; preds = %125, %117
%129 = load i32, i32* %7
%130 = trunc i32 %129 to i8
%131 = load i8*, i8** %3
%132 = getelementptr inbounds i8, i8* %131, i32 1
store i8* %132, i8** %3
store i8 %130, i8* %131
%133 = load i32, i32* %6
%134 = add nsw i32 %133, 1
store i32 %134, i32* %6
%135 = load i32, i32* %5
%136 = xor i32 %135, -1
%137 = load i32, i32* %8
%138 = and i32 %137, %136
store i32 %138, i32* %8
br label %139
139: ; preds = %128
%140 = load i32, i32* %5
%141 = ashr i32 %140, 1
store i32 %141, i32* %5
br label %43
142: ; preds = %49
%143 = load i32, i32* %6
ret i32 %143
}

LLVM IR (-O2):
define i32 @setchar(i8* nocapture writeonly %0, i8* nocapture %1) {
%3 = load i8, i8* %1
%4 = getelementptr inbounds i8, i8* %1, i64 1
%5 = load i8, i8* %4
%6 = or i8 %5, %3
%7 = getelementptr inbounds i8, i8* %1, i64 2
%8 = load i8, i8* %7
%9 = or i8 %6, %8
%10 = getelementptr inbounds i8, i8* %1, i64 3
%11 = load i8, i8* %10
%12 = or i8 %9, %11
%13 = getelementptr inbounds i8, i8* %1, i64 4
%14 = load i8, i8* %13
%15 = or i8 %12, %14
%16 = getelementptr inbounds i8, i8* %1, i64 5
%17 = load i8, i8* %16
%18 = or i8 %15, %17
%19 = getelementptr inbounds i8, i8* %1, i64 6
%20 = load i8, i8* %19
%21 = or i8 %18, %20
%22 = icmp eq i8 %21, 0
br i1 %22, label %88, label %23
23: ; preds = %2
%24 = sext i8 %21 to i32
br label %25
25: ; preds = %78, %23
%26 = phi i8 [ %87, %78 ], [ %20, %23 ]
%27 = phi i8 [ %86, %78 ], [ %17, %23 ]
%28 = phi i8 [ %85, %78 ], [ %14, %23 ]
%29 = phi i8 [ %84, %78 ], [ %11, %23 ]
%30 = phi i8 [ %83, %78 ], [ %8, %23 ]
%31 = phi i8 [ %82, %78 ], [ %5, %23 ]
%32 = phi i8 [ %81, %78 ], [ %3, %23 ]
%33 = phi i32 [ %74, %78 ], [ %24, %23 ]
%34 = phi i32 [ %72, %78 ], [ 0, %23 ]
%35 = phi i32 [ %79, %78 ], [ 128, %23 ]
%36 = phi i8* [ %80, %78 ], [ %0, %23 ]
%37 = zext i8 %32 to i32
%38 = and i32 %35, %37
%39 = icmp ne i32 %38, 0
%40 = zext i1 %39 to i32
%41 = zext i8 %31 to i32
%42 = and i32 %35, %41
%43 = icmp eq i32 %42, 0
%44 = or i32 %40, 2
%45 = select i1 %43, i32 %40, i32 %44
%46 = zext i8 %30 to i32
%47 = and i32 %35, %46
%48 = icmp eq i32 %47, 0
%49 = or i32 %45, 4
%50 = select i1 %48, i32 %45, i32 %49
%51 = zext i8 %29 to i32
%52 = and i32 %35, %51
%53 = icmp eq i32 %52, 0
%54 = or i32 %50, 8
%55 = select i1 %53, i32 %50, i32 %54
%56 = zext i8 %28 to i32
%57 = and i32 %35, %56
%58 = icmp eq i32 %57, 0
%59 = or i32 %55, 16
%60 = select i1 %58, i32 %55, i32 %59
%61 = zext i8 %27 to i32
%62 = and i32 %35, %61
%63 = icmp eq i32 %62, 0
%64 = or i32 %60, 32
%65 = select i1 %63, i32 %60, i32 %64
%66 = zext i8 %26 to i32
%67 = and i32 %35, %66
%68 = icmp eq i32 %67, 0
%69 = or i32 %65, 64
%70 = select i1 %68, i32 %65, i32 %69
%71 = trunc i32 %70 to i8
store i8 %71, i8* %36
%72 = add nuw nsw i32 %34, 1
%73 = xor i32 %35, -1
%74 = and i32 %33, %73
%75 = icmp ne i32 %74, 0
%76 = icmp ugt i32 %35, 1
%77 = select i1 %75, i1 %76, i1 false
br i1 %77, label %78, label %88
78: ; preds = %25
%79 = lshr i32 %35, 1
%80 = getelementptr inbounds i8, i8* %36, i64 1
%81 = load i8, i8* %1
%82 = load i8, i8* %4
%83 = load i8, i8* %7
%84 = load i8, i8* %10
%85 = load i8, i8* %13
%86 = load i8, i8* %16
%87 = load i8, i8* %19
br label %25
88: ; preds = %25, %2
%89 = phi i32 [ 0, %2 ], [ %72, %25 ]
ret i32 %89
}