char *Purge(char *string, char target) {
  register char *ptr;
  static char area[1024];
  ptr = area;
  while (*string) {
    if (*string != target) {
      *(ptr++) = *string;
    }
    string++;
  }
  *ptr = '\0';
  return (area);
}


x86 assembly (clang, -O0):
<Purge>:
push   %rbp
mov    %rsp,%rbp
mov    %sil,%al
mov    %rdi,-0x8(%rbp)
mov    %al,-0x9(%rbp)
lea    0x2f1b(%rip),%rax
mov    %rax,-0x18(%rbp)
mov    -0x8(%rbp),%rax
cmpb   $0x0,(%rax)
je     1161 <Purge+0x61>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
movsbl -0x9(%rbp),%ecx
cmp    %ecx,%eax
je     1150 <Purge+0x50>
mov    -0x8(%rbp),%rax
mov    (%rax),%cl
mov    -0x18(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x18(%rbp)
mov    %cl,(%rax)
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    1119 <Purge+0x19>
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
lea    0x2ec1(%rip),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<Purge>:
mov    (%rdi),%cl
test   %cl,%cl
je     1138 <Purge+0x38>
add    $0x1,%rdi
lea    0x2f1f(%rip),%rax
jmp    112b <Purge+0x2b>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movzbl (%rdi),%ecx
add    $0x1,%rdi
test   %cl,%cl
je     113f <Purge+0x3f>
cmp    %sil,%cl
je     1120 <Purge+0x20>
mov    %cl,(%rax)
add    $0x1,%rax
jmp    1120 <Purge+0x20>
lea    0x2ef1(%rip),%rax
movb   $0x0,(%rax)
lea    0x2ee7(%rip),%rax
ret

LLVM IR (-O0):
@Purge.area = internal global [1024 x i8] zeroinitializer
define i8* @Purge(i8* %0, i8 signext %1) {
%3 = alloca i8*
%4 = alloca i8
%5 = alloca i8*
store i8* %0, i8** %3
store i8 %1, i8* %4
store i8* getelementptr inbounds ([1024 x i8], [1024 x i8]* @Purge.area, i64 0, i64 0), i8** %5
br label %6
6: ; preds = %22, %2
%7 = load i8*, i8** %3
%8 = load i8, i8* %7
%9 = icmp ne i8 %8, 0
br i1 %9, label %10, label %25
10: ; preds = %6
%11 = load i8*, i8** %3
%12 = load i8, i8* %11
%13 = sext i8 %12 to i32
%14 = load i8, i8* %4
%15 = sext i8 %14 to i32
%16 = icmp ne i32 %13, %15
br i1 %16, label %17, label %22
17: ; preds = %10
%18 = load i8*, i8** %3
%19 = load i8, i8* %18
%20 = load i8*, i8** %5
%21 = getelementptr inbounds i8, i8* %20, i32 1
store i8* %21, i8** %5
store i8 %19, i8* %20
br label %22
22: ; preds = %17, %10
%23 = load i8*, i8** %3
%24 = getelementptr inbounds i8, i8* %23, i32 1
store i8* %24, i8** %3
br label %6
25: ; preds = %6
%26 = load i8*, i8** %5
store i8 0, i8* %26
ret i8* getelementptr inbounds ([1024 x i8], [1024 x i8]* @Purge.area, i64 0, i64 0)
}

LLVM IR (-O2):
@Purge.area = internal global [1024 x i8] zeroinitializer
define i8* @Purge(i8* nocapture %0, i8 signext %1) {
%3 = load i8, i8* %0
%4 = icmp eq i8 %3, 0
br i1 %4, label %17, label %5
5: ; preds = %2, %12
%6 = phi i8 [ %15, %12 ], [ %3, %2 ]
%7 = phi i8* [ %13, %12 ], [ getelementptr inbounds ([1024 x i8], [1024 x i8]* @Purge.area, i64 0, i64 0), %2 ]
%8 = phi i8* [ %14, %12 ], [ %0, %2 ]
%9 = icmp eq i8 %6, %1
br i1 %9, label %12, label %10
10: ; preds = %5
%11 = getelementptr inbounds i8, i8* %7, i64 1
store i8 %6, i8* %7
br label %12
12: ; preds = %10, %5
%13 = phi i8* [ %11, %10 ], [ %7, %5 ]
%14 = getelementptr inbounds i8, i8* %8, i64 1
%15 = load i8, i8* %14
%16 = icmp eq i8 %15, 0
br i1 %16, label %17, label %5
17: ; preds = %12, %2
%18 = phi i8* [ getelementptr inbounds ([1024 x i8], [1024 x i8]* @Purge.area, i64 0, i64 0), %2 ], [ %13, %12 ]
store i8 0, i8* %18
ret i8* getelementptr inbounds ([1024 x i8], [1024 x i8]* @Purge.area, i64 0, i64 0)
}