int compute_fst(const char *token) {
  int pos = 0;
  int total = 0;
NODE_0:
  pos++;
  switch (token[pos - 1]) {
  case 'P':
    total += 2;
    goto NODE_1;
  case 'T':
    total += 6;
    goto NODE_1;
  case 'S':
    total += 3;
    goto NODE_3;
  case 'M':
    goto NODE_4;
  default:
    return -1;
  }
NODE_1:
  pos++;
  switch (token[pos - 1]) {
  case 'O':
    goto NODE_2;
  default:
    return -1;
  }
NODE_2:
  pos++;
  switch (token[pos - 1]) {
  case 'P':
    goto NODE_7;
  default:
    return -1;
  }
NODE_3:
  pos++;
  switch (token[pos - 1]) {
  case 'T':
    total += 2;
    goto NODE_1;
  case 'L':
    goto NODE_4;
  default:
    return -1;
  }
NODE_4:
  pos++;
  switch (token[pos - 1]) {
  case 'O':
    goto NODE_5;
  default:
    return -1;
  }
NODE_5:
  pos++;
  switch (token[pos - 1]) {
  case 'T':
    total += 1;
    goto NODE_6;
  case 'P':
    goto NODE_7;
  default:
    return -1;
  }
NODE_6:
  pos++;
  switch (token[pos - 1]) {
  case 'H':
    goto NODE_7;
  default:
    return -1;
  }
NODE_7:
  goto END;
END:
  return total;
}


x86 assembly (clang, -O0):
<compute_fst>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
movl   $0x0,-0x18(%rbp)
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x14(%rbp),%ecx
add    $0xffffffff,%ecx
movslq %ecx,%rcx
movsbl (%rax,%rcx,1),%eax
add    $0xffffffb3,%eax
mov    %eax,%ecx
mov    %rcx,-0x20(%rbp)
sub    $0x7,%eax
ja     1185 <compute_fst+0x85>
mov    -0x20(%rbp),%rax
lea    0xeb3(%rip),%rcx
movslq (%rcx,%rax,4),%rax
add    %rcx,%rax
jmp    *%rax
mov    -0x18(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x18(%rbp)
jmp    1191 <compute_fst+0x91>
mov    -0x18(%rbp),%eax
add    $0x6,%eax
mov    %eax,-0x18(%rbp)
jmp    1191 <compute_fst+0x91>
mov    -0x18(%rbp),%eax
add    $0x3,%eax
mov    %eax,-0x18(%rbp)
jmp    11ff <compute_fst+0xff>
jmp    125a <compute_fst+0x15a>
movl   $0xffffffff,-0x4(%rbp)
jmp    132e <compute_fst+0x22e>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x14(%rbp),%ecx
add    $0xffffffff,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,1),%al
sub    $0x4f,%al
jne    11bc <compute_fst+0xbc>
jmp    11b7 <compute_fst+0xb7>
jmp    11c8 <compute_fst+0xc8>
movl   $0xffffffff,-0x4(%rbp)
jmp    132e <compute_fst+0x22e>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x14(%rbp),%ecx
add    $0xffffffff,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,1),%al
sub    $0x50,%al
jne    11f3 <compute_fst+0xf3>
jmp    11ee <compute_fst+0xee>
jmp    1323 <compute_fst+0x223>
movl   $0xffffffff,-0x4(%rbp)
jmp    132e <compute_fst+0x22e>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x14(%rbp),%ecx
add    $0xffffffff,%ecx
movslq %ecx,%rcx
movsbl (%rax,%rcx,1),%eax
mov    %eax,-0x24(%rbp)
sub    $0x4c,%eax
je     1249 <compute_fst+0x149>
jmp    122a <compute_fst+0x12a>
mov    -0x24(%rbp),%eax
sub    $0x54,%eax
jne    124e <compute_fst+0x14e>
jmp    123b <compute_fst+0x13b>
mov    -0x18(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x18(%rbp)
jmp    1191 <compute_fst+0x91>
jmp    125a <compute_fst+0x15a>
movl   $0xffffffff,-0x4(%rbp)
jmp    132e <compute_fst+0x22e>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x14(%rbp),%ecx
add    $0xffffffff,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,1),%al
sub    $0x4f,%al
jne    1285 <compute_fst+0x185>
jmp    1280 <compute_fst+0x180>
jmp    1291 <compute_fst+0x191>
movl   $0xffffffff,-0x4(%rbp)
jmp    132e <compute_fst+0x22e>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x14(%rbp),%ecx
add    $0xffffffff,%ecx
movslq %ecx,%rcx
movsbl (%rax,%rcx,1),%eax
mov    %eax,-0x28(%rbp)
sub    $0x50,%eax
je     12db <compute_fst+0x1db>
jmp    12bc <compute_fst+0x1bc>
mov    -0x28(%rbp),%eax
sub    $0x54,%eax
jne    12e0 <compute_fst+0x1e0>
jmp    12cd <compute_fst+0x1cd>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    12ec <compute_fst+0x1ec>
jmp    1323 <compute_fst+0x223>
movl   $0xffffffff,-0x4(%rbp)
jmp    132e <compute_fst+0x22e>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x14(%rbp),%ecx
add    $0xffffffff,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,1),%al
sub    $0x48,%al
jne    1317 <compute_fst+0x217>
jmp    1312 <compute_fst+0x212>
jmp    1323 <compute_fst+0x223>
movl   $0xffffffff,-0x4(%rbp)
jmp    132e <compute_fst+0x22e>
jmp    1328 <compute_fst+0x228>
mov    -0x18(%rbp),%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<compute_fst>:
movsbl (%rdi),%ecx
mov    $0xffffffff,%eax
add    $0xffffffb3,%ecx
cmp    $0x7,%ecx
ja     1147 <compute_fst+0x47>
xor    %r8d,%r8d
mov    $0x2,%r9d
mov    $0x1,%esi
lea    0xedb(%rip),%rdx
movslq (%rdx,%rcx,4),%rcx
add    %rdx,%rcx
jmp    *%rcx
movsbl 0x1(%rdi),%ecx
mov    $0x2,%esi
cmp    $0x4c,%ecx
je     1161 <compute_fst+0x61>
mov    $0x5,%r9d
cmp    $0x54,%ecx
je     114e <compute_fst+0x4e>
ret
mov    $0x6,%r9d
mov    %esi,%ecx
cmpb   $0x4f,(%rdi,%rcx,1)
jne    1147 <compute_fst+0x47>
cmpb   $0x50,0x1(%rcx,%rdi,1)
jne    1147 <compute_fst+0x47>
mov    %r9d,%eax
ret
mov    $0x3,%r8d
mov    %esi,%edx
cmpb   $0x4f,(%rdi,%rdx,1)
jne    1147 <compute_fst+0x47>
movsbl 0x1(%rdx,%rdi,1),%ecx
cmp    $0x50,%ecx
je     1189 <compute_fst+0x89>
cmp    $0x54,%ecx
jne    1147 <compute_fst+0x47>
cmpb   $0x48,0x2(%rdx,%rdi,1)
jne    1147 <compute_fst+0x47>
add    $0x1,%r8d
mov    %r8d,%r9d
mov    %r9d,%eax
ret

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

LLVM IR (-O2):
define i32 @compute_fst(i8* nocapture %0) {
%2 = load i8, i8* %0
%3 = sext i8 %2 to i32
switch i32 %3, label %44 [
i32 80, label %9
i32 84, label %4
i32 83, label %5
i32 77, label %22
]
4: ; preds = %1
br label %9
5: ; preds = %1
%6 = getelementptr inbounds i8, i8* %0, i64 1
%7 = load i8, i8* %6
%8 = sext i8 %7 to i32
switch i32 %8, label %44 [
i32 84, label %9
i32 76, label %22
]
9: ; preds = %5, %1, %4
%10 = phi i32 [ 1, %4 ], [ 1, %1 ], [ 2, %5 ]
%11 = phi i32 [ 6, %4 ], [ 2, %1 ], [ 5, %5 ]
%12 = zext i32 %10 to i64
%13 = getelementptr inbounds i8, i8* %0, i64 %12
%14 = load i8, i8* %13
%15 = icmp eq i8 %14, 79
br i1 %15, label %16, label %44
16: ; preds = %9
%17 = add nuw nsw i32 %10, 1
%18 = zext i32 %17 to i64
%19 = getelementptr inbounds i8, i8* %0, i64 %18
%20 = load i8, i8* %19
%21 = icmp eq i8 %20, 80
br i1 %21, label %42, label %44
22: ; preds = %5, %1
%23 = phi i32 [ 1, %1 ], [ 2, %5 ]
%24 = phi i32 [ 0, %1 ], [ 3, %5 ]
%25 = zext i32 %23 to i64
%26 = getelementptr inbounds i8, i8* %0, i64 %25
%27 = load i8, i8* %26
%28 = icmp eq i8 %27, 79
br i1 %28, label %29, label %44
29: ; preds = %22
%30 = add nuw nsw i32 %23, 1
%31 = zext i32 %30 to i64
%32 = getelementptr inbounds i8, i8* %0, i64 %31
%33 = load i8, i8* %32
%34 = sext i8 %33 to i32
switch i32 %34, label %44 [
i32 84, label %35
i32 80, label %42
]
35: ; preds = %29
%36 = add nuw nsw i32 %23, 2
%37 = add nuw nsw i32 %24, 1
%38 = zext i32 %36 to i64
%39 = getelementptr inbounds i8, i8* %0, i64 %38
%40 = load i8, i8* %39
%41 = icmp eq i8 %40, 72
br i1 %41, label %42, label %44
42: ; preds = %16, %29, %35
%43 = phi i32 [ %24, %29 ], [ %37, %35 ], [ %11, %16 ]
br label %44
44: ; preds = %35, %29, %22, %5, %16, %9, %1, %42
%45 = phi i32 [ %43, %42 ], [ -1, %1 ], [ -1, %9 ], [ -1, %16 ], [ -1, %5 ], [ -1, %22 ], [ -1, %29 ], [ -1, %35 ]
ret i32 %45
}