void rr(char *n, char l) {
  unsigned char m;
  if (l < 8) {
    m = (1 << l) - 1;
    *n = (*n & ~m) | ((*n ^ ((*n & (m << l)) >> l)) & m);
  } else {
    l /= 8;
    for (m = 8 - 2 * l; m < 8 - l; ++m) {
      n[m + l] ^= n[m];
    }
  }
}


x86 assembly (clang, -O0):
<rr>:
push   %rbp
mov    %rsp,%rbp
mov    %sil,%al
mov    %rdi,-0x8(%rbp)
mov    %al,-0x9(%rbp)
movsbl -0x9(%rbp),%eax
cmp    $0x8,%eax
jge    117b <rr+0x7b>
movsbl -0x9(%rbp),%ecx
mov    $0x1,%eax
shl    %cl,%eax
sub    $0x1,%eax
mov    %al,-0xa(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
movzbl -0xa(%rbp),%ecx
xor    $0xffffffff,%ecx
and    %ecx,%eax
mov    -0x8(%rbp),%rcx
movsbl (%rcx),%ecx
mov    %ecx,-0x10(%rbp)
mov    -0x8(%rbp),%rcx
movsbl (%rcx),%edx
movzbl -0xa(%rbp),%esi
movsbl -0x9(%rbp),%ecx
shl    %cl,%esi
mov    %esi,%ecx
and    %ecx,%edx
movsbl -0x9(%rbp),%ecx
sar    %cl,%edx
mov    -0x10(%rbp),%ecx
xor    %edx,%ecx
movzbl -0xa(%rbp),%edx
and    %edx,%ecx
or     %ecx,%eax
mov    %al,%cl
mov    -0x8(%rbp),%rax
mov    %cl,(%rax)
jmp    11ea <rr+0xea>
movsbl -0x9(%rbp),%eax
mov    $0x8,%ecx
cltd
idiv   %ecx
mov    %al,-0x9(%rbp)
movsbl -0x9(%rbp),%ecx
shl    $0x1,%ecx
mov    $0x8,%eax
sub    %ecx,%eax
mov    %al,-0xa(%rbp)
movzbl -0xa(%rbp),%eax
movsbl -0x9(%rbp),%edx
mov    $0x8,%ecx
sub    %edx,%ecx
cmp    %ecx,%eax
jge    11e5 <rr+0xe5>
mov    -0x8(%rbp),%rax
movzbl -0xa(%rbp),%ecx
movsbl (%rax,%rcx,1),%esi
mov    -0x8(%rbp),%rax
movzbl -0xa(%rbp),%ecx
movsbl -0x9(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsbl (%rax,%rcx,1),%edx
xor    %esi,%edx
mov    %dl,(%rax,%rcx,1)
mov    -0xa(%rbp),%al
add    $0x1,%al
mov    %al,-0xa(%rbp)
jmp    119b <rr+0x9b>
jmp    11ea <rr+0xea>
pop    %rbp
ret

x86 assembly (clang, -O2):
<rr>:
mov    %esi,%ecx
cmp    $0x7,%cl
jg     112e <rr+0x2e>
mov    $0xffffffff,%eax
shl    %cl,%eax
mov    %eax,%edx
not    %edx
movsbl (%rdi),%r8d
movzbl %dl,%esi
and    %r8d,%eax
shl    %cl,%esi
and    %r8d,%esi
sar    %cl,%esi
xor    %r8d,%esi
and    %edx,%esi
or     %eax,%esi
mov    %sil,(%rdi)
ret
shr    $0x3,%cl
movzbl %cl,%edx
lea    (%rdx,%rdx,1),%eax
mov    $0x8,%cl
sub    %al,%cl
mov    $0x8,%eax
sub    %edx,%eax
movzbl %cl,%ecx
cmp    %ecx,%eax
jle    1166 <rr+0x66>
mov    %edx,%r8d
nopl   0x0(%rax)
mov    %ecx,%esi
movzbl (%rdi,%rsi,1),%edx
add    %r8,%rsi
xor    %dl,(%rdi,%rsi,1)
add    $0x1,%ecx
movzbl %cl,%ecx
cmp    %ecx,%eax
jg     1150 <rr+0x50>
ret

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

LLVM IR (-O2):
define void @rr(i8* nocapture %0, i8 signext %1) {
%3 = sext i8 %1 to i32
%4 = icmp slt i8 %1, 8
br i1 %4, label %5, label %19
5: ; preds = %2
%6 = shl nsw i32 -1, %3
%7 = load i8, i8* %0
%8 = sext i8 %7 to i32
%9 = and i32 %6, 255
%10 = xor i32 %9, 255
%11 = and i32 %6, %8
%12 = shl i32 %10, %3
%13 = and i32 %12, %8
%14 = ashr i32 %13, %3
%15 = xor i32 %14, %8
%16 = and i32 %15, %10
%17 = or i32 %16, %11
%18 = trunc i32 %17 to i8
store i8 %18, i8* %0
br label %40
19: ; preds = %2
%20 = lshr i8 %1, 3
%21 = zext i8 %20 to i32
%22 = mul nsw i8 %20, -2
%23 = add nsw i8 %22, 8
%24 = sub nsw i32 8, %21
%25 = zext i8 %23 to i32
%26 = icmp sgt i32 %24, %25
br i1 %26, label %27, label %40
27: ; preds = %19, %27
%28 = phi i32 [ %38, %27 ], [ %25, %19 ]
%29 = zext i32 %28 to i64
%30 = getelementptr inbounds i8, i8* %0, i64 %29
%31 = load i8, i8* %30
%32 = add nuw nsw i32 %28, %21
%33 = zext i32 %32 to i64
%34 = getelementptr inbounds i8, i8* %0, i64 %33
%35 = load i8, i8* %34
%36 = xor i8 %35, %31
store i8 %36, i8* %34
%37 = add nuw nsw i32 %28, 1
%38 = and i32 %37, 255
%39 = icmp sgt i32 %24, %38
br i1 %39, label %27, label %40
40: ; preds = %27, %19, %5
ret void
}