void extract_expr(source, dest, i0) char *source, *dest;
int *i0;
{
  char ch;
  int len = 0;
  int flag = 0;
  while (1) {
    ch = source[*i0];
    *i0 = *i0 + 1;
    if (ch == '}')
      break;
    if (ch == '{')
      flag = 1;
    else {
      if (flag) {
        dest[len] = ch;
        len++;
      }
    }
  }
  dest[len] = 0;
}


x86 assembly (clang, -O0):
<extract_expr>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%rcx
movslq (%rcx),%rcx
mov    (%rax,%rcx,1),%al
mov    %al,-0x19(%rbp)
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    -0x18(%rbp),%rax
mov    %ecx,(%rax)
movsbl -0x19(%rbp),%eax
cmp    $0x7d,%eax
jne    1150 <extract_expr+0x50>
jmp    1194 <extract_expr+0x94>
movsbl -0x19(%rbp),%eax
cmp    $0x7b,%eax
jne    1169 <extract_expr+0x69>
movl   $0x1,-0x24(%rbp)
jmp    118f <extract_expr+0x8f>
cmpl   $0x0,-0x24(%rbp)
je     118a <extract_expr+0x8a>
mov    -0x19(%rbp),%dl
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    118f <extract_expr+0x8f>
jmp    111e <extract_expr+0x1e>
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
pop    %rbp
ret

x86 assembly (clang, -O2):
<extract_expr>:
xor    %r8d,%r8d
xor    %r9d,%r9d
movslq (%rdx),%rcx
jmp    1117 <extract_expr+0x17>
nopl   0x0(%rax,%rax,1)
add    $0x1,%rcx
mov    %eax,%r9d
movzbl (%rdi,%rcx,1),%r10d
lea    0x1(%rcx),%eax
mov    %eax,(%rdx)
mov    $0x1,%eax
cmp    $0x7b,%r10b
je     1110 <extract_expr+0x10>
cmp    $0x7d,%r10b
je     114c <extract_expr+0x4c>
xor    %eax,%eax
test   %r9d,%r9d
je     1110 <extract_expr+0x10>
mov    %r8d,%eax
mov    %r10b,(%rsi,%rax,1)
add    $0x1,%r8d
mov    $0x1,%r9d
jmp    1106 <extract_expr+0x6>
mov    %r8d,%eax
movb   $0x0,(%rsi,%rax,1)
ret

LLVM IR (-O0):
define void @extract_expr(i8* %0, i8* %1, i32* %2) {
%4 = alloca i8*
%5 = alloca i8*
%6 = alloca i32*
%7 = alloca i8
%8 = alloca i32
%9 = alloca i32
store i8* %0, i8** %4
store i8* %1, i8** %5
store i32* %2, i32** %6
store i32 0, i32* %8
store i32 0, i32* %9
br label %10
10: ; preds = %3, %42
%11 = load i8*, i8** %4
%12 = load i32*, i32** %6
%13 = load i32, i32* %12
%14 = sext i32 %13 to i64
%15 = getelementptr inbounds i8, i8* %11, i64 %14
%16 = load i8, i8* %15
store i8 %16, i8* %7
%17 = load i32*, i32** %6
%18 = load i32, i32* %17
%19 = add nsw i32 %18, 1
%20 = load i32*, i32** %6
store i32 %19, i32* %20
%21 = load i8, i8* %7
%22 = sext i8 %21 to i32
%23 = icmp eq i32 %22, 125
br i1 %23, label %24, label %25
24: ; preds = %10
br label %43
25: ; preds = %10
%26 = load i8, i8* %7
%27 = sext i8 %26 to i32
%28 = icmp eq i32 %27, 123
br i1 %28, label %29, label %30
29: ; preds = %25
store i32 1, i32* %9
br label %42
30: ; preds = %25
%31 = load i32, i32* %9
%32 = icmp ne i32 %31, 0
br i1 %32, label %33, label %41
33: ; preds = %30
%34 = load i8, i8* %7
%35 = load i8*, i8** %5
%36 = load i32, i32* %8
%37 = sext i32 %36 to i64
%38 = getelementptr inbounds i8, i8* %35, i64 %37
store i8 %34, i8* %38
%39 = load i32, i32* %8
%40 = add nsw i32 %39, 1
store i32 %40, i32* %8
br label %41
41: ; preds = %33, %30
br label %42
42: ; preds = %41, %29
br label %10
43: ; preds = %24
%44 = load i8*, i8** %5
%45 = load i32, i32* %8
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds i8, i8* %44, i64 %46
store i8 0, i8* %47
ret void
}

LLVM IR (-O2):
define void @extract_expr(i8* nocapture %0, i8* nocapture writeonly %1, i32* nocapture %2) {
br label %4
4: ; preds = %3, %19
%5 = phi i32 [ %22, %19 ], [ 0, %3 ]
%6 = phi i32 [ 1, %19 ], [ 0, %3 ]
%7 = load i32, i32* %2
br label %8
8: ; preds = %15, %4
%9 = phi i32 [ %7, %4 ], [ %14, %15 ]
%10 = phi i32 [ %6, %4 ], [ %16, %15 ]
%11 = sext i32 %9 to i64
%12 = getelementptr inbounds i8, i8* %0, i64 %11
%13 = load i8, i8* %12
%14 = add nsw i32 %9, 1
store i32 %14, i32* %2
switch i8 %13, label %17 [
i8 125, label %23
i8 123, label %15
]
15: ; preds = %8, %17
%16 = phi i32 [ 0, %17 ], [ 1, %8 ]
br label %8
17: ; preds = %8
%18 = icmp eq i32 %10, 0
br i1 %18, label %15, label %19
19: ; preds = %17
%20 = zext i32 %5 to i64
%21 = getelementptr inbounds i8, i8* %1, i64 %20
store i8 %13, i8* %21
%22 = add nuw nsw i32 %5, 1
br label %4
23: ; preds = %8
%24 = zext i32 %5 to i64
%25 = getelementptr inbounds i8, i8* %1, i64 %24
store i8 0, i8* %25
ret void
}