int char_to_r40(char c) {
  if ((c >= 'A') && (c <= 'Z')) {
    return c - 64;
  } else if ((c >= 'a') && (c <= 'z')) {
    return c - 96;
  } else if ((c >= '0') && (c <= '9')) {
    return c - 21;
  } else if (c == '_') {
    return 37;
  } else if (c == '%') {
    return 38;
  } else if (c == '#') {
    return 39;
  } else if (c == 0) {
    return 0;
  } else {
    return -1;
  }
}


x86 assembly (clang, -O0):
<char_to_r40>:
push   %rbp
mov    %rsp,%rbp
mov    %dil,%al
mov    %al,-0x5(%rbp)
movsbl -0x5(%rbp),%eax
cmp    $0x41,%eax
jl     1133 <char_to_r40+0x33>
movsbl -0x5(%rbp),%eax
cmp    $0x5a,%eax
jg     1133 <char_to_r40+0x33>
movsbl -0x5(%rbp),%eax
sub    $0x40,%eax
mov    %eax,-0x4(%rbp)
jmp    11f0 <char_to_r40+0xf0>
movsbl -0x5(%rbp),%eax
cmp    $0x61,%eax
jl     115c <char_to_r40+0x5c>
movsbl -0x5(%rbp),%eax
cmp    $0x7a,%eax
jg     115c <char_to_r40+0x5c>
movsbl -0x5(%rbp),%eax
sub    $0x60,%eax
mov    %eax,-0x4(%rbp)
jmp    11f0 <char_to_r40+0xf0>
movsbl -0x5(%rbp),%eax
cmp    $0x30,%eax
jl     1185 <char_to_r40+0x85>
movsbl -0x5(%rbp),%eax
cmp    $0x39,%eax
jg     1185 <char_to_r40+0x85>
movsbl -0x5(%rbp),%eax
sub    $0x15,%eax
mov    %eax,-0x4(%rbp)
jmp    11f0 <char_to_r40+0xf0>
movsbl -0x5(%rbp),%eax
cmp    $0x5f,%eax
jne    119e <char_to_r40+0x9e>
movl   $0x25,-0x4(%rbp)
jmp    11f0 <char_to_r40+0xf0>
movsbl -0x5(%rbp),%eax
cmp    $0x25,%eax
jne    11b7 <char_to_r40+0xb7>
movl   $0x26,-0x4(%rbp)
jmp    11f0 <char_to_r40+0xf0>
movsbl -0x5(%rbp),%eax
cmp    $0x23,%eax
jne    11d0 <char_to_r40+0xd0>
movl   $0x27,-0x4(%rbp)
jmp    11f0 <char_to_r40+0xf0>
movsbl -0x5(%rbp),%eax
cmp    $0x0,%eax
jne    11e9 <char_to_r40+0xe9>
movl   $0x0,-0x4(%rbp)
jmp    11f0 <char_to_r40+0xf0>
movl   $0xffffffff,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<char_to_r40>:
mov    %edi,%eax
lea    -0x41(%rax),%ecx
cmp    $0x19,%cl
ja     110e <char_to_r40+0xe>
add    $0xffffffc0,%eax
ret
lea    -0x61(%rax),%ecx
cmp    $0x19,%cl
ja     111a <char_to_r40+0x1a>
add    $0xffffffa0,%eax
ret
lea    -0x30(%rax),%ecx
cmp    $0x9,%cl
ja     1126 <char_to_r40+0x26>
add    $0xffffffeb,%eax
ret
cmp    $0x24,%al
jg     1138 <char_to_r40+0x38>
test   %al,%al
je     1146 <char_to_r40+0x46>
cmp    $0x23,%al
jne    114f <char_to_r40+0x4f>
mov    $0x27,%eax
ret
cmp    $0x5f,%al
je     1149 <char_to_r40+0x49>
cmp    $0x25,%al
jne    114f <char_to_r40+0x4f>
mov    $0x26,%eax
ret
xor    %eax,%eax
ret
mov    $0x25,%eax
ret
mov    $0xffffffff,%eax
ret

LLVM IR (-O0):
define i32 @char_to_r40(i8 signext %0) {
%2 = alloca i32
%3 = alloca i8
store i8 %0, i8* %3
%4 = load i8, i8* %3
%5 = sext i8 %4 to i32
%6 = icmp sge i32 %5, 65
br i1 %6, label %7, label %15
7: ; preds = %1
%8 = load i8, i8* %3
%9 = sext i8 %8 to i32
%10 = icmp sle i32 %9, 90
br i1 %10, label %11, label %15
11: ; preds = %7
%12 = load i8, i8* %3
%13 = sext i8 %12 to i32
%14 = sub nsw i32 %13, 64
store i32 %14, i32* %2
br label %60
15: ; preds = %7, %1
%16 = load i8, i8* %3
%17 = sext i8 %16 to i32
%18 = icmp sge i32 %17, 97
br i1 %18, label %19, label %27
19: ; preds = %15
%20 = load i8, i8* %3
%21 = sext i8 %20 to i32
%22 = icmp sle i32 %21, 122
br i1 %22, label %23, label %27
23: ; preds = %19
%24 = load i8, i8* %3
%25 = sext i8 %24 to i32
%26 = sub nsw i32 %25, 96
store i32 %26, i32* %2
br label %60
27: ; preds = %19, %15
%28 = load i8, i8* %3
%29 = sext i8 %28 to i32
%30 = icmp sge i32 %29, 48
br i1 %30, label %31, label %39
31: ; preds = %27
%32 = load i8, i8* %3
%33 = sext i8 %32 to i32
%34 = icmp sle i32 %33, 57
br i1 %34, label %35, label %39
35: ; preds = %31
%36 = load i8, i8* %3
%37 = sext i8 %36 to i32
%38 = sub nsw i32 %37, 21
store i32 %38, i32* %2
br label %60
39: ; preds = %31, %27
%40 = load i8, i8* %3
%41 = sext i8 %40 to i32
%42 = icmp eq i32 %41, 95
br i1 %42, label %43, label %44
43: ; preds = %39
store i32 37, i32* %2
br label %60
44: ; preds = %39
%45 = load i8, i8* %3
%46 = sext i8 %45 to i32
%47 = icmp eq i32 %46, 37
br i1 %47, label %48, label %49
48: ; preds = %44
store i32 38, i32* %2
br label %60
49: ; preds = %44
%50 = load i8, i8* %3
%51 = sext i8 %50 to i32
%52 = icmp eq i32 %51, 35
br i1 %52, label %53, label %54
53: ; preds = %49
store i32 39, i32* %2
br label %60
54: ; preds = %49
%55 = load i8, i8* %3
%56 = sext i8 %55 to i32
%57 = icmp eq i32 %56, 0
br i1 %57, label %58, label %59
58: ; preds = %54
store i32 0, i32* %2
br label %60
59: ; preds = %54
store i32 -1, i32* %2
br label %60
60: ; preds = %59, %58, %53, %48, %43, %35, %23, %11
%61 = load i32, i32* %2
ret i32 %61
}

LLVM IR (-O2):
define i32 @char_to_r40(i8 signext %0) {
%2 = sext i8 %0 to i32
%3 = add i8 %0, -65
%4 = icmp ult i8 %3, 26
br i1 %4, label %5, label %7
5: ; preds = %1
%6 = add nsw i32 %2, -64
br label %22
7: ; preds = %1
%8 = add i8 %0, -97
%9 = icmp ult i8 %8, 26
br i1 %9, label %10, label %12
10: ; preds = %7
%11 = add nsw i32 %2, -96
br label %22
12: ; preds = %7
%13 = add i8 %0, -48
%14 = icmp ult i8 %13, 10
br i1 %14, label %15, label %17
15: ; preds = %12
%16 = add nsw i32 %2, -21
br label %22
17: ; preds = %12
switch i8 %0, label %21 [
i8 95, label %22
i8 37, label %18
i8 35, label %19
i8 0, label %20
]
18: ; preds = %17
br label %22
19: ; preds = %17
br label %22
20: ; preds = %17
br label %22
21: ; preds = %17
br label %22
22: ; preds = %17, %21, %20, %19, %18, %15, %10, %5
%23 = phi i32 [ %6, %5 ], [ %11, %10 ], [ %16, %15 ], [ 38, %18 ], [ 39, %19 ], [ 0, %20 ], [ -1, %21 ], [ 37, %17 ]
ret i32 %23
}