#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 *strchr(char const *, char);
double dir2v(const char *op, char dir, double val) {
  char *pt;
  pt = strchr(op, dir);
  if (!pt)
    return 0.;
  for (; pt != op && *pt != '+' && *pt != '-'; pt--)
    ;
  if (*pt == '+')
    return +val;
  else if (*pt == '-')
    return -val;
  else
    return +val;
}


x86 assembly (clang, -O0):
<dir2v>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %sil,%al
mov    %rdi,-0x10(%rbp)
mov    %al,-0x11(%rbp)
movsd  %xmm0,-0x20(%rbp)
mov    -0x10(%rbp),%rdi
movsbl -0x11(%rbp),%esi
call   1030 <strchr@plt>
mov    %rax,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
jne    1150 <dir2v+0x40>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1212 <dir2v+0x102>
jmp    1155 <dir2v+0x45>
mov    -0x28(%rbp),%rcx
xor    %eax,%eax
cmp    -0x10(%rbp),%rcx
mov    %al,-0x29(%rbp)
je     118d <dir2v+0x7d>
mov    -0x28(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x2b,%ecx
mov    %al,-0x29(%rbp)
je     118d <dir2v+0x7d>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
setne  %al
mov    %al,-0x29(%rbp)
mov    -0x29(%rbp),%al
test   $0x1,%al
jne    119d <dir2v+0x8d>
jmp    11b3 <dir2v+0xa3>
jmp    11a2 <dir2v+0x92>
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
jmp    1155 <dir2v+0x45>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2b,%eax
jne    11d2 <dir2v+0xc2>
movsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1212 <dir2v+0x102>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
jne    1208 <dir2v+0xf8>
movsd  -0x20(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1212 <dir2v+0x102>
movsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<dir2v>:
push   %rbx
sub    $0x10,%rsp
movaps %xmm0,(%rsp)
mov    %rdi,%rbx
call   1030 <strchr@plt>
test   %rax,%rax
je     114b <dir2v+0x3b>
cmp    %rbx,%rax
je     1150 <dir2v+0x40>
movaps (%rsp),%xmm0
nop
movzbl (%rax),%ecx
cmp    $0x2b,%cl
je     1157 <dir2v+0x47>
cmp    $0x2d,%cl
je     1157 <dir2v+0x47>
add    $0xffffffffffffffff,%rax
cmp    %rbx,%rax
jne    1130 <dir2v+0x20>
mov    %rbx,%rax
jmp    1157 <dir2v+0x47>
xorps  %xmm0,%xmm0
jmp    1163 <dir2v+0x53>
mov    %rbx,%rax
movaps (%rsp),%xmm0
cmpb   $0x2d,(%rax)
jne    1163 <dir2v+0x53>
xorps  0xe9d(%rip),%xmm0
add    $0x10,%rsp
pop    %rbx
ret

LLVM IR (-O0):
define double @dir2v(i8* %0, i8 signext %1, double %2) {
%4 = alloca double
%5 = alloca i8*
%6 = alloca i8
%7 = alloca double
%8 = alloca i8*
store i8* %0, i8** %5
store i8 %1, i8* %6
store double %2, double* %7
%9 = load i8*, i8** %5
%10 = load i8, i8* %6
%11 = call i8* @strchr(i8* %9, i8 signext %10)
store i8* %11, i8** %8
%12 = load i8*, i8** %8
%13 = icmp ne i8* %12, null
br i1 %13, label %15, label %14
14: ; preds = %3
store double 0.000000e+00, double* %4
br label %53
15: ; preds = %3
br label %16
16: ; preds = %33, %15
%17 = load i8*, i8** %8
%18 = load i8*, i8** %5
%19 = icmp ne i8* %17, %18
br i1 %19, label %20, label %30
20: ; preds = %16
%21 = load i8*, i8** %8
%22 = load i8, i8* %21
%23 = sext i8 %22 to i32
%24 = icmp ne i32 %23, 43
br i1 %24, label %25, label %30
25: ; preds = %20
%26 = load i8*, i8** %8
%27 = load i8, i8* %26
%28 = sext i8 %27 to i32
%29 = icmp ne i32 %28, 45
br label %30
30: ; preds = %25, %20, %16
%31 = phi i1 [ false, %20 ], [ false, %16 ], [ %29, %25 ]
br i1 %31, label %32, label %36
32: ; preds = %30
br label %33
33: ; preds = %32
%34 = load i8*, i8** %8
%35 = getelementptr inbounds i8, i8* %34, i32 -1
store i8* %35, i8** %8
br label %16
36: ; preds = %30
%37 = load i8*, i8** %8
%38 = load i8, i8* %37
%39 = sext i8 %38 to i32
%40 = icmp eq i32 %39, 43
br i1 %40, label %41, label %43
41: ; preds = %36
%42 = load double, double* %7
store double %42, double* %4
br label %53
43: ; preds = %36
%44 = load i8*, i8** %8
%45 = load i8, i8* %44
%46 = sext i8 %45 to i32
%47 = icmp eq i32 %46, 45
br i1 %47, label %48, label %51
48: ; preds = %43
%49 = load double, double* %7
%50 = fneg double %49
store double %50, double* %4
br label %53
51: ; preds = %43
%52 = load double, double* %7
store double %52, double* %4
br label %53
53: ; preds = %51, %48, %41, %14
%54 = load double, double* %4
ret double %54
}

LLVM IR (-O2):
define double @dir2v(i8* %0, i8 signext %1, double %2) {
%4 = ptrtoint i8* %0 to i64
%5 = tail call i8* @strchr(i8* dereferenceable(1) %0, i8 signext %1)
%6 = ptrtoint i8* %5 to i64
%7 = icmp eq i8* %5, null
br i1 %7, label %25, label %8
8: ; preds = %3
%9 = icmp eq i8* %5, %0
br i1 %9, label %19, label %10
10: ; preds = %8
%11 = sub i64 %4, %6
%12 = getelementptr i8, i8* %5, i64 %11
br label %13
13: ; preds = %10, %16
%14 = phi i8* [ %17, %16 ], [ %5, %10 ]
%15 = load i8, i8* %14
switch i8 %15, label %16 [
i8 43, label %19
i8 45, label %19
]
16: ; preds = %13
%17 = getelementptr inbounds i8, i8* %14, i64 -1
%18 = icmp eq i8* %17, %0
br i1 %18, label %19, label %13
19: ; preds = %16, %13, %13, %8
%20 = phi i8* [ %0, %8 ], [ %14, %13 ], [ %14, %13 ], [ %12, %16 ]
%21 = load i8, i8* %20
%22 = icmp eq i8 %21, 45
%23 = fneg double %2
%24 = select i1 %22, double %23, double %2
br label %25
25: ; preds = %19, %3
%26 = phi double [ 0.000000e+00, %3 ], [ %24, %19 ]
ret double %26
}