void shift_to_gr(text, length) register char *text;
register int length;
{
  while (length-- > 0)
    *text++ |= 0x80;
}


x86 assembly (clang, -O0):
<shift_to_gr>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    -0xc(%rbp),%eax
mov    %eax,%ecx
add    $0xffffffff,%ecx
mov    %ecx,-0xc(%rbp)
cmp    $0x0,%eax
jle    113e <shift_to_gr+0x3e>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
movsbl (%rax),%ecx
or     $0x80,%ecx
mov    %cl,(%rax)
jmp    110b <shift_to_gr+0xb>
pop    %rbp
ret

x86 assembly (clang, -O2):
<shift_to_gr>:
test   %esi,%esi
jle    122f <shift_to_gr+0x12f>
lea    -0x1(%rsi),%r9d
cmp    $0x7,%r9d
jae    111a <shift_to_gr+0x1a>
mov    %rdi,%rax
jmp    1212 <shift_to_gr+0x112>
movabs $0x1ffffffe0,%r11
cmp    $0x1f,%r9d
jae    1131 <shift_to_gr+0x31>
xor    %edx,%edx
jmp    11dc <shift_to_gr+0xdc>
lea    0x1(%r9),%r8
mov    %r8,%rdx
and    %r11,%rdx
lea    -0x20(%rdx),%rax
mov    %rax,%r10
shr    $0x5,%r10
add    $0x1,%r10
test   %rax,%rax
je     1230 <shift_to_gr+0x130>
mov    %r10,%rcx
and    $0xfffffffffffffffe,%rcx
xor    %eax,%eax
movaps 0xe9d(%rip),%xmm0
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movups (%rdi,%rax,1),%xmm1
movups 0x10(%rdi,%rax,1),%xmm2
movups 0x20(%rdi,%rax,1),%xmm3
movups 0x30(%rdi,%rax,1),%xmm4
orps   %xmm0,%xmm1
orps   %xmm0,%xmm2
movups %xmm1,(%rdi,%rax,1)
movups %xmm2,0x10(%rdi,%rax,1)
orps   %xmm0,%xmm3
orps   %xmm0,%xmm4
movups %xmm3,0x20(%rdi,%rax,1)
movups %xmm4,0x30(%rdi,%rax,1)
add    $0x40,%rax
add    $0xfffffffffffffffe,%rcx
jne    1170 <shift_to_gr+0x70>
test   $0x1,%r10b
je     11d1 <shift_to_gr+0xd1>
movups (%rdi,%rax,1),%xmm0
movups 0x10(%rdi,%rax,1),%xmm1
movaps 0xe3e(%rip),%xmm2
orps   %xmm2,%xmm0
orps   %xmm2,%xmm1
movups %xmm0,(%rdi,%rax,1)
movups %xmm1,0x10(%rdi,%rax,1)
cmp    %rdx,%r8
je     122f <shift_to_gr+0x12f>
test   $0x18,%r8b
je     123e <shift_to_gr+0x13e>
add    $0x1,%r9
add    $0x18,%r11
and    %r9,%r11
sub    %r11d,%esi
lea    (%rdi,%r11,1),%rax
movabs $0x8080808080808080,%rcx
80 80 80
nopl   0x0(%rax,%rax,1)
or     %rcx,(%rdi,%rdx,1)
add    $0x8,%rdx
cmp    %rdx,%r11
jne    1200 <shift_to_gr+0x100>
cmp    %r11,%r9
je     122f <shift_to_gr+0x12f>
add    $0x1,%esi
cs nopw 0x0(%rax,%rax,1)
nop
orb    $0x80,(%rax)
add    $0x1,%rax
add    $0xffffffff,%esi
cmp    $0x1,%esi
ja     1220 <shift_to_gr+0x120>
ret
xor    %eax,%eax
test   $0x1,%r10b
jne    11b2 <shift_to_gr+0xb2>
jmp    11d1 <shift_to_gr+0xd1>
add    %rdx,%rdi
sub    %edx,%esi
jmp    1112 <shift_to_gr+0x12>

LLVM IR (-O0):
define void @shift_to_gr(i8* %0, i32 %1) {
%3 = alloca i8*
%4 = alloca i32
store i8* %0, i8** %3
store i32 %1, i32* %4
br label %5
5: ; preds = %9, %2
%6 = load i32, i32* %4
%7 = add nsw i32 %6, -1
store i32 %7, i32* %4
%8 = icmp sgt i32 %6, 0
br i1 %8, label %9, label %16
9: ; preds = %5
%10 = load i8*, i8** %3
%11 = getelementptr inbounds i8, i8* %10, i32 1
store i8* %11, i8** %3
%12 = load i8, i8* %10
%13 = sext i8 %12 to i32
%14 = or i32 %13, 128
%15 = trunc i32 %14 to i8
store i8 %15, i8* %10
br label %5
16: ; preds = %5
ret void
}

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