int strtoroman(char *str) {
  int value = 0;
  while (*str) {
    switch (*str) {
    case 'I':
      if (str[1] == 'V' || str[1] == 'X')
        value -= 1;
      else
        value += 1;
      break;
    case 'V':
      value += 5;
      break;
    case 'X':
      if (str[1] == 'L' || str[1] == 'C')
        value -= 10;
      else
        value += 10;
      break;
    case 'L':
      value += 50;
      break;
    case 'C':
      if (str[1] == 'D' || str[1] == 'M')
        value -= 100;
      else
        value += 100;
      break;
    case 'D':
      value += 500;
      break;
    case 'M':
      value += 1000;
      break;
    default:
      return -1;
    }
    str++;
  }
  return value;
}


x86 assembly (clang, -O0):
<strtoroman>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
mov    -0x10(%rbp),%rax
cmpb   $0x0,(%rax)
je     125c <strtoroman+0x15c>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
add    $0xffffffbd,%eax
mov    %eax,%ecx
mov    %rcx,-0x20(%rbp)
sub    $0x15,%eax
ja     123f <strtoroman+0x13f>
mov    -0x20(%rbp),%rax
lea    0xec0(%rip),%rcx
movslq (%rcx,%rax,4),%rax
add    %rcx,%rax
jmp    *%rax
mov    -0x10(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x56,%eax
je     116b <strtoroman+0x6b>
mov    -0x10(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x58,%eax
jne    1179 <strtoroman+0x79>
mov    -0x14(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1182 <strtoroman+0x82>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    124b <strtoroman+0x14b>
mov    -0x14(%rbp),%eax
add    $0x5,%eax
mov    %eax,-0x14(%rbp)
jmp    124b <strtoroman+0x14b>
mov    -0x10(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x4c,%eax
je     11b7 <strtoroman+0xb7>
mov    -0x10(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x43,%eax
jne    11c5 <strtoroman+0xc5>
mov    -0x14(%rbp),%eax
sub    $0xa,%eax
mov    %eax,-0x14(%rbp)
jmp    11ce <strtoroman+0xce>
mov    -0x14(%rbp),%eax
add    $0xa,%eax
mov    %eax,-0x14(%rbp)
jmp    124b <strtoroman+0x14b>
mov    -0x14(%rbp),%eax
add    $0x32,%eax
mov    %eax,-0x14(%rbp)
jmp    124b <strtoroman+0x14b>
mov    -0x10(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x44,%eax
je     1203 <strtoroman+0x103>
mov    -0x10(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x4d,%eax
jne    1211 <strtoroman+0x111>
mov    -0x14(%rbp),%eax
sub    $0x64,%eax
mov    %eax,-0x14(%rbp)
jmp    121a <strtoroman+0x11a>
mov    -0x14(%rbp),%eax
add    $0x64,%eax
mov    %eax,-0x14(%rbp)
jmp    124b <strtoroman+0x14b>
mov    -0x14(%rbp),%eax
add    $0x1f4,%eax
mov    %eax,-0x14(%rbp)
jmp    124b <strtoroman+0x14b>
mov    -0x14(%rbp),%eax
add    $0x3e8,%eax
mov    %eax,-0x14(%rbp)
jmp    124b <strtoroman+0x14b>
movl   $0xffffffff,-0x4(%rbp)
jmp    1262 <strtoroman+0x162>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    110f <strtoroman+0xf>
mov    -0x14(%rbp),%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<strtoroman>:
mov    (%rdi),%dl
test   %dl,%dl
je     11a8 <strtoroman+0xa8>
add    $0x1,%rdi
xor    %ecx,%ecx
lea    0xee9(%rip),%r10
mov    $0xffffff9c,%r8d
mov    $0xfffffff6,%r9d
jmp    113f <strtoroman+0x3f>
mov    $0x3e8,%esi
nopw   0x0(%rax,%rax,1)
add    %esi,%ecx
movzbl (%rdi),%edx
add    $0x1,%rdi
mov    %ecx,%eax
test   %dl,%dl
je     11a7 <strtoroman+0xa7>
movsbl %dl,%edx
mov    $0xffffffff,%eax
add    $0xffffffbd,%edx
cmp    $0x15,%edx
ja     11a7 <strtoroman+0xa7>
mov    $0x5,%esi
movslq (%r10,%rdx,4),%rdx
add    %r10,%rdx
jmp    *%rdx
movzbl (%rdi),%eax
cmp    $0x4d,%al
mov    $0x64,%esi
cmove  %r8d,%esi
cmp    $0x44,%al
cmove  %r8d,%esi
jmp    1130 <strtoroman+0x30>
mov    $0x1f4,%esi
jmp    1130 <strtoroman+0x30>
movzbl (%rdi),%eax
add    $0xaa,%al
and    $0xfd,%al
cmp    $0x1,%al
sbb    %esi,%esi
or     $0x1,%esi
jmp    1130 <strtoroman+0x30>
mov    $0x32,%esi
jmp    1130 <strtoroman+0x30>
movzbl (%rdi),%eax
cmp    $0x43,%al
mov    $0xa,%esi
cmove  %r9d,%esi
cmp    $0x4c,%al
cmove  %r9d,%esi
jmp    1130 <strtoroman+0x30>
ret
xor    %eax,%eax
ret

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

LLVM IR (-O2):
define i32 @strtoroman(i8* nocapture %0) {
%2 = load i8, i8* %0
%3 = icmp eq i8 %2, 0
br i1 %3, label %39, label %4
4: ; preds = %1, %33
%5 = phi i8 [ %37, %33 ], [ %2, %1 ]
%6 = phi i32 [ %35, %33 ], [ 0, %1 ]
%7 = phi i8* [ %36, %33 ], [ %0, %1 ]
%8 = sext i8 %5 to i32
switch i32 %8, label %39 [
i32 73, label %9
i32 86, label %33
i32 88, label %16
i32 76, label %23
i32 67, label %24
i32 68, label %31
i32 77, label %32
]
9: ; preds = %4
%10 = getelementptr inbounds i8, i8* %7, i64 1
%11 = load i8, i8* %10
%12 = icmp eq i8 %11, 86
%13 = icmp eq i8 %11, 88
%14 = or i1 %12, %13
%15 = select i1 %14, i32 -1, i32 1
br label %33
16: ; preds = %4
%17 = getelementptr inbounds i8, i8* %7, i64 1
%18 = load i8, i8* %17
%19 = icmp eq i8 %18, 76
%20 = icmp eq i8 %18, 67
%21 = or i1 %19, %20
%22 = select i1 %21, i32 -10, i32 10
br label %33
23: ; preds = %4
br label %33
24: ; preds = %4
%25 = getelementptr inbounds i8, i8* %7, i64 1
%26 = load i8, i8* %25
%27 = icmp eq i8 %26, 68
%28 = icmp eq i8 %26, 77
%29 = or i1 %27, %28
%30 = select i1 %29, i32 -100, i32 100
br label %33
31: ; preds = %4
br label %33
32: ; preds = %4
br label %33
33: ; preds = %24, %16, %4, %9, %32, %31, %23
%34 = phi i32 [ 1000, %32 ], [ 500, %31 ], [ 50, %23 ], [ %15, %9 ], [ 5, %4 ], [ %22, %16 ], [ %30, %24 ]
%35 = add nsw i32 %6, %34
%36 = getelementptr inbounds i8, i8* %7, i64 1
%37 = load i8, i8* %36
%38 = icmp eq i8 %37, 0
br i1 %38, label %39, label %4
39: ; preds = %4, %33, %1
%40 = phi i32 [ 0, %1 ], [ %35, %33 ], [ -1, %4 ]
ret i32 %40
}