#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
char atoi(char *);
char hex2i(char *);
char *strchr(char *, char);
int /*<<< orphan*/ strcpy(char *, char *);
int spr_compile(char *_s, int f, char *code) {
  char *poo, *po;
  char s[100];
  int codelen = 0;
  strcpy(s, _s);
  po = strchr(s, ';');
  if (po != NULL) {
    while (1) {
      *po = 0;
      if (po == s)
        return 0;
      po--;
      if (*po != ' ')
        break;
    }
  }
  po = s;
  while (*po != ' ')
    po++;
  while (*po == ' ')
    po++;
  if (*po != 'D')
    return 0;
  po++;
  if (*po != 'B')
    return 0;
  po++;
  while (1) {
    while (*po == ' ')
      po++;
    poo = strchr(po, ',');
    if (poo != NULL)
      *poo = 0;
    if (*po == '#')
      code[codelen] = hex2i(po + 1);
    else
      code[codelen] = atoi(po);
    if (f)
      code[codelen] = ~code[codelen];
    codelen++;
    if (poo == NULL)
      break;
    poo++;
    po = poo;
  }
  return 1;
}


x86 assembly (clang, -O0):
<spr_compile>:
push   %rbp
mov    %rsp,%rbp
sub    $0xb0,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    %rdx,-0x20(%rbp)
movl   $0x0,-0xa4(%rbp)
lea    -0xa0(%rbp),%rdi
mov    -0x10(%rbp),%rsi
call   1030 <strcpy@plt>
lea    -0xa0(%rbp),%rdi
mov    $0x3b,%esi
call   1040 <strchr@plt>
mov    %rax,-0x30(%rbp)
cmpq   $0x0,-0x30(%rbp)
je     11e7 <spr_compile+0xa7>
jmp    1195 <spr_compile+0x55>
mov    -0x30(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x30(%rbp),%rax
lea    -0xa0(%rbp),%rcx
cmp    %rcx,%rax
jne    11bc <spr_compile+0x7c>
movl   $0x0,-0x4(%rbp)
jmp    1389 <spr_compile+0x249>
mov    -0x30(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x20,%eax
je     11dd <spr_compile+0x9d>
jmp    11e2 <spr_compile+0xa2>
jmp    1195 <spr_compile+0x55>
jmp    11e7 <spr_compile+0xa7>
lea    -0xa0(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x20,%eax
je     1213 <spr_compile+0xd3>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    11f2 <spr_compile+0xb2>
jmp    1218 <spr_compile+0xd8>
mov    -0x30(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x20,%eax
jne    1239 <spr_compile+0xf9>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    1218 <spr_compile+0xd8>
mov    -0x30(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x44,%eax
je     1255 <spr_compile+0x115>
movl   $0x0,-0x4(%rbp)
jmp    1389 <spr_compile+0x249>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x42,%eax
je     127d <spr_compile+0x13d>
movl   $0x0,-0x4(%rbp)
jmp    1389 <spr_compile+0x249>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    128e <spr_compile+0x14e>
mov    -0x30(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x20,%eax
jne    12af <spr_compile+0x16f>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    128e <spr_compile+0x14e>
mov    -0x30(%rbp),%rdi
mov    $0x2c,%esi
call   1040 <strchr@plt>
mov    %rax,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
je     12d3 <spr_compile+0x193>
mov    -0x28(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x30(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x23,%eax
jne    1305 <spr_compile+0x1c5>
mov    -0x30(%rbp),%rdi
add    $0x1,%rdi
call   1050 <hex2i@plt>
mov    %al,%dl
mov    -0x20(%rbp),%rax
movslq -0xa4(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
jmp    131e <spr_compile+0x1de>
mov    -0x30(%rbp),%rdi
call   1060 <atoi@plt>
mov    %al,%dl
mov    -0x20(%rbp),%rax
movslq -0xa4(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
cmpl   $0x0,-0x14(%rbp)
je     134a <spr_compile+0x20a>
mov    -0x20(%rbp),%rax
movslq -0xa4(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
xor    $0xffffffff,%eax
mov    %al,%dl
mov    -0x20(%rbp),%rax
movslq -0xa4(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0xa4(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xa4(%rbp)
cmpq   $0x0,-0x28(%rbp)
jne    1369 <spr_compile+0x229>
jmp    1382 <spr_compile+0x242>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
mov    %rax,-0x30(%rbp)
jmp    1289 <spr_compile+0x149>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0xb0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<spr_compile>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x78,%rsp
mov    %rdx,0x8(%rsp)
mov    %esi,%ebp
mov    %rdi,%rsi
lea    0x10(%rsp),%rbx
mov    %rbx,%rdi
call   1030 <strcpy@plt>
mov    %rbx,%rdi
mov    $0x3b,%esi
call   1040 <strchr@plt>
test   %rax,%rax
je     1196 <spr_compile+0x56>
nopw   0x0(%rax,%rax,1)
movb   $0x0,(%rax)
cmp    %rbx,%rax
je     1235 <spr_compile+0xf5>
cmpb   $0x20,-0x1(%rax)
lea    -0x1(%rax),%rax
je     1180 <spr_compile+0x40>
lea    0x11(%rsp),%rbx
nopl   0x0(%rax,%rax,1)
cmpb   $0x20,-0x1(%rbx)
lea    0x1(%rbx),%rbx
jne    11a0 <spr_compile+0x60>
mov    $0x20,%al
cmp    $0x20,%al
jne    11bc <spr_compile+0x7c>
movzbl -0x1(%rbx),%eax
add    $0x1,%rbx
cmp    $0x20,%al
je     11b0 <spr_compile+0x70>
cmp    $0x44,%al
jne    1235 <spr_compile+0xf5>
xor    %eax,%eax
cmpb   $0x42,-0x1(%rbx)
jne    123e <spr_compile+0xfe>
neg    %ebp
sbb    %r12d,%r12d
xor    %r13d,%r13d
movzbl (%rbx),%r14d
add    $0x1,%rbx
cmp    $0x20,%r14b
je     11d0 <spr_compile+0x90>
lea    -0x1(%rbx),%r15
mov    %r15,%rdi
mov    $0x2c,%esi
call   1040 <strchr@plt>
mov    %rax,%rbp
test   %rax,%rax
je     11ff <spr_compile+0xbf>
movb   $0x0,0x0(%rbp)
movzbl (%r15),%r14d
cmp    $0x23,%r14b
jne    120f <spr_compile+0xcf>
mov    %rbx,%rdi
call   1050 <hex2i@plt>
jmp    1217 <spr_compile+0xd7>
mov    %r15,%rdi
call   1060 <atoi@plt>
xor    %r12b,%al
mov    0x8(%rsp),%rcx
mov    %al,(%rcx,%r13,1)
test   %rbp,%rbp
je     1239 <spr_compile+0xf9>
add    $0x1,%r13
add    $0x1,%rbp
mov    %rbp,%rbx
jmp    11d0 <spr_compile+0x90>
xor    %eax,%eax
jmp    123e <spr_compile+0xfe>
mov    $0x1,%eax
add    $0x78,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i32 @spr_compile(i8* %0, i32 %1, i8* %2) {
%4 = alloca i32
%5 = alloca i8*
%6 = alloca i32
%7 = alloca i8*
%8 = alloca i8*
%9 = alloca i8*
%10 = alloca [100 x i8]
%11 = alloca i32
store i8* %0, i8** %5
store i32 %1, i32* %6
store i8* %2, i8** %7
store i32 0, i32* %11
%12 = getelementptr inbounds [100 x i8], [100 x i8]* %10, i64 0, i64 0
%13 = load i8*, i8** %5
%14 = call i32 @strcpy(i8* %12, i8* %13)
%15 = getelementptr inbounds [100 x i8], [100 x i8]* %10, i64 0, i64 0
%16 = call i8* @strchr(i8* %15, i8 signext 59)
store i8* %16, i8** %9
%17 = load i8*, i8** %9
%18 = icmp ne i8* %17, null
br i1 %18, label %19, label %36
19: ; preds = %3
br label %20
20: ; preds = %19, %34
%21 = load i8*, i8** %9
store i8 0, i8* %21
%22 = load i8*, i8** %9
%23 = getelementptr inbounds [100 x i8], [100 x i8]* %10, i64 0, i64 0
%24 = icmp eq i8* %22, %23
br i1 %24, label %25, label %26
25: ; preds = %20
store i32 0, i32* %4
br label %135
26: ; preds = %20
%27 = load i8*, i8** %9
%28 = getelementptr inbounds i8, i8* %27, i32 -1
store i8* %28, i8** %9
%29 = load i8*, i8** %9
%30 = load i8, i8* %29
%31 = sext i8 %30 to i32
%32 = icmp ne i32 %31, 32
br i1 %32, label %33, label %34
33: ; preds = %26
br label %35
34: ; preds = %26
br label %20
35: ; preds = %33
br label %36
36: ; preds = %35, %3
%37 = getelementptr inbounds [100 x i8], [100 x i8]* %10, i64 0, i64 0
store i8* %37, i8** %9
br label %38
38: ; preds = %43, %36
%39 = load i8*, i8** %9
%40 = load i8, i8* %39
%41 = sext i8 %40 to i32
%42 = icmp ne i32 %41, 32
br i1 %42, label %43, label %46
43: ; preds = %38
%44 = load i8*, i8** %9
%45 = getelementptr inbounds i8, i8* %44, i32 1
store i8* %45, i8** %9
br label %38
46: ; preds = %38
br label %47
47: ; preds = %52, %46
%48 = load i8*, i8** %9
%49 = load i8, i8* %48
%50 = sext i8 %49 to i32
%51 = icmp eq i32 %50, 32
br i1 %51, label %52, label %55
52: ; preds = %47
%53 = load i8*, i8** %9
%54 = getelementptr inbounds i8, i8* %53, i32 1
store i8* %54, i8** %9
br label %47
55: ; preds = %47
%56 = load i8*, i8** %9
%57 = load i8, i8* %56
%58 = sext i8 %57 to i32
%59 = icmp ne i32 %58, 68
br i1 %59, label %60, label %61
60: ; preds = %55
store i32 0, i32* %4
br label %135
61: ; preds = %55
%62 = load i8*, i8** %9
%63 = getelementptr inbounds i8, i8* %62, i32 1
store i8* %63, i8** %9
%64 = load i8*, i8** %9
%65 = load i8, i8* %64
%66 = sext i8 %65 to i32
%67 = icmp ne i32 %66, 66
br i1 %67, label %68, label %69
68: ; preds = %61
store i32 0, i32* %4
br label %135
69: ; preds = %61
%70 = load i8*, i8** %9
%71 = getelementptr inbounds i8, i8* %70, i32 1
store i8* %71, i8** %9
br label %72
72: ; preds = %69, %130
br label %73
73: ; preds = %78, %72
%74 = load i8*, i8** %9
%75 = load i8, i8* %74
%76 = sext i8 %75 to i32
%77 = icmp eq i32 %76, 32
br i1 %77, label %78, label %81
78: ; preds = %73
%79 = load i8*, i8** %9
%80 = getelementptr inbounds i8, i8* %79, i32 1
store i8* %80, i8** %9
br label %73
81: ; preds = %73
%82 = load i8*, i8** %9
%83 = call i8* @strchr(i8* %82, i8 signext 44)
store i8* %83, i8** %8
%84 = load i8*, i8** %8
%85 = icmp ne i8* %84, null
br i1 %85, label %86, label %88
86: ; preds = %81
%87 = load i8*, i8** %8
store i8 0, i8* %87
br label %88
88: ; preds = %86, %81
%89 = load i8*, i8** %9
%90 = load i8, i8* %89
%91 = sext i8 %90 to i32
%92 = icmp eq i32 %91, 35
br i1 %92, label %93, label %101
93: ; preds = %88
%94 = load i8*, i8** %9
%95 = getelementptr inbounds i8, i8* %94, i64 1
%96 = call signext i8 @hex2i(i8* %95)
%97 = load i8*, i8** %7
%98 = load i32, i32* %11
%99 = sext i32 %98 to i64
%100 = getelementptr inbounds i8, i8* %97, i64 %99
store i8 %96, i8* %100
br label %108
101: ; preds = %88
%102 = load i8*, i8** %9
%103 = call signext i8 @atoi(i8* %102)
%104 = load i8*, i8** %7
%105 = load i32, i32* %11
%106 = sext i32 %105 to i64
%107 = getelementptr inbounds i8, i8* %104, i64 %106
store i8 %103, i8* %107
br label %108
108: ; preds = %101, %93
%109 = load i32, i32* %6
%110 = icmp ne i32 %109, 0
br i1 %110, label %111, label %124
111: ; preds = %108
%112 = load i8*, i8** %7
%113 = load i32, i32* %11
%114 = sext i32 %113 to i64
%115 = getelementptr inbounds i8, i8* %112, i64 %114
%116 = load i8, i8* %115
%117 = sext i8 %116 to i32
%118 = xor i32 %117, -1
%119 = trunc i32 %118 to i8
%120 = load i8*, i8** %7
%121 = load i32, i32* %11
%122 = sext i32 %121 to i64
%123 = getelementptr inbounds i8, i8* %120, i64 %122
store i8 %119, i8* %123
br label %124
124: ; preds = %111, %108
%125 = load i32, i32* %11
%126 = add nsw i32 %125, 1
store i32 %126, i32* %11
%127 = load i8*, i8** %8
%128 = icmp eq i8* %127, null
br i1 %128, label %129, label %130
129: ; preds = %124
br label %134
130: ; preds = %124
%131 = load i8*, i8** %8
%132 = getelementptr inbounds i8, i8* %131, i32 1
store i8* %132, i8** %8
%133 = load i8*, i8** %8
store i8* %133, i8** %9
br label %72
134: ; preds = %129
store i32 1, i32* %4
br label %135
135: ; preds = %134, %68, %60, %25
%136 = load i32, i32* %4
ret i32 %136
}

LLVM IR (-O2):
define i32 @spr_compile(i8* %0, i32 %1, i8* nocapture %2) {
%4 = alloca [100 x i8]
%5 = getelementptr inbounds [100 x i8], [100 x i8]* %4, i64 0, i64 0
%6 = call i32 @strcpy(i8* %5, i8* %0)
%7 = call i8* @strchr(i8* %5, i8 signext 59)
%8 = icmp eq i8* %7, null
br i1 %8, label %16, label %9
9: ; preds = %3, %12
%10 = phi i8* [ %13, %12 ], [ %7, %3 ]
store i8 0, i8* %10
%11 = icmp eq i8* %10, %5
br i1 %11, label %63, label %12
12: ; preds = %9
%13 = getelementptr inbounds i8, i8* %10, i64 -1
%14 = load i8, i8* %13
%15 = icmp eq i8 %14, 32
br i1 %15, label %9, label %16
16: ; preds = %12, %3
br label %17
17: ; preds = %16, %17
%18 = phi i8* [ %21, %17 ], [ %5, %16 ]
%19 = load i8, i8* %18
%20 = icmp eq i8 %19, 32
%21 = getelementptr inbounds i8, i8* %18, i64 1
br i1 %20, label %22, label %17
22: ; preds = %17, %25
%23 = phi i8 [ %27, %25 ], [ 32, %17 ]
%24 = phi i8* [ %26, %25 ], [ %18, %17 ]
switch i8 %23, label %63 [
i8 32, label %25
i8 68, label %28
]
25: ; preds = %22
%26 = getelementptr inbounds i8, i8* %24, i64 1
%27 = load i8, i8* %26
br label %22
28: ; preds = %22
%29 = getelementptr inbounds i8, i8* %24, i64 1
%30 = load i8, i8* %29
%31 = icmp eq i8 %30, 66
br i1 %31, label %32, label %63
32: ; preds = %28
%33 = getelementptr inbounds i8, i8* %24, i64 2
%34 = icmp ne i32 %1, 0
%35 = sext i1 %34 to i8
br label %36
36: ; preds = %60, %32
%37 = phi i64 [ %61, %60 ], [ 0, %32 ]
%38 = phi i8* [ %62, %60 ], [ %33, %32 ]
br label %39
39: ; preds = %39, %36
%40 = phi i8* [ %38, %36 ], [ %43, %39 ]
%41 = load i8, i8* %40
%42 = icmp eq i8 %41, 32
%43 = getelementptr inbounds i8, i8* %40, i64 1
br i1 %42, label %39, label %44
44: ; preds = %39
%45 = call i8* @strchr(i8* %40, i8 signext 44)
%46 = icmp eq i8* %45, null
br i1 %46, label %49, label %47
47: ; preds = %44
store i8 0, i8* %45
%48 = load i8, i8* %40
br label %49
49: ; preds = %47, %44
%50 = phi i8 [ %48, %47 ], [ %41, %44 ]
%51 = icmp eq i8 %50, 35
br i1 %51, label %52, label %54
52: ; preds = %49
%53 = call signext i8 @hex2i(i8* %43)
br label %56
54: ; preds = %49
%55 = call signext i8 @atoi(i8* %40)
br label %56
56: ; preds = %54, %52
%57 = phi i8 [ %53, %52 ], [ %55, %54 ]
%58 = getelementptr inbounds i8, i8* %2, i64 %37
%59 = xor i8 %57, %35
store i8 %59, i8* %58
br i1 %46, label %63, label %60
60: ; preds = %56
%61 = add nuw i64 %37, 1
%62 = getelementptr inbounds i8, i8* %45, i64 1
br label %36
63: ; preds = %9, %22, %56, %28
%64 = phi i32 [ 0, %28 ], [ 1, %56 ], [ 0, %22 ], [ 0, %9 ]
ret i32 %64
}