char *ppdirbackward(p, limit)
char *p;
char *limit;
{
  char *np = p;
  for (;; p = --np) {
    if (*np == '\n' && np[-1] == '\r')
      --np;
    for (; np > limit && np[-1] != '\r' && np[-1] != '\n'; --np)
      if (np[-1] == 0)
        return np;
    if (*np != '#')
      return p;
  }
}


x86 assembly (clang, -O0):
<ppdirbackward>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
movsbl (%rax),%eax
cmp    $0xa,%eax
jne    1141 <ppdirbackward+0x41>
mov    -0x20(%rbp),%rax
movsbl -0x1(%rax),%eax
cmp    $0xd,%eax
jne    1141 <ppdirbackward+0x41>
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
jmp    1146 <ppdirbackward+0x46>
mov    -0x20(%rbp),%rcx
xor    %eax,%eax
cmp    -0x18(%rbp),%rcx
mov    %al,-0x21(%rbp)
jbe    1180 <ppdirbackward+0x80>
mov    -0x20(%rbp),%rax
movsbl -0x1(%rax),%ecx
xor    %eax,%eax
cmp    $0xd,%ecx
mov    %al,-0x21(%rbp)
je     1180 <ppdirbackward+0x80>
mov    -0x20(%rbp),%rax
movsbl -0x1(%rax),%eax
cmp    $0xa,%eax
setne  %al
mov    %al,-0x21(%rbp)
mov    -0x21(%rbp),%al
test   $0x1,%al
jne    1190 <ppdirbackward+0x90>
jmp    11c4 <ppdirbackward+0xc4>
mov    -0x20(%rbp),%rax
movsbl -0x1(%rax),%eax
cmp    $0x0,%eax
jne    11ae <ppdirbackward+0xae>
mov    -0x20(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    11fb <ppdirbackward+0xfb>
jmp    11b3 <ppdirbackward+0xb3>
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
jmp    1146 <ppdirbackward+0x46>
mov    -0x20(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x23,%eax
je     11e1 <ppdirbackward+0xe1>
mov    -0x10(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    11fb <ppdirbackward+0xfb>
jmp    11e6 <ppdirbackward+0xe6>
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
mov    %rax,-0x10(%rbp)
jmp    1114 <ppdirbackward+0x14>
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<ppdirbackward>:
jmp    1119 <ppdirbackward+0x19>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
lea    -0x1(%rdx),%rdi
cmpb   $0x23,(%rdx)
jne    1157 <ppdirbackward+0x57>
mov    %rdi,%rax
cmpb   $0xa,(%rdi)
jne    1130 <ppdirbackward+0x30>
lea    -0x1(%rax),%rdi
cmpb   $0xd,-0x1(%rax)
cmovne %rax,%rdi
nopl   (%rax)
mov    %rdi,%rdx
cmp    %rsi,%rdi
jbe    1110 <ppdirbackward+0x10>
lea    -0x1(%rdx),%rdi
movzbl -0x1(%rdx),%ecx
test   %cl,%cl
je     1150 <ppdirbackward+0x50>
cmp    $0xd,%cl
je     1110 <ppdirbackward+0x10>
cmp    $0xa,%cl
jne    1130 <ppdirbackward+0x30>
jmp    1110 <ppdirbackward+0x10>
add    $0x1,%rdi
mov    %rdi,%rax
ret

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

LLVM IR (-O2):
define i8* @ppdirbackward(i8* %0, i8* readnone %1) {
br label %3
3: ; preds = %20, %2
%4 = phi i8* [ %0, %2 ], [ %23, %20 ]
%5 = load i8, i8* %4
%6 = icmp eq i8 %5, 10
br i1 %6, label %7, label %12
7: ; preds = %3
%8 = getelementptr inbounds i8, i8* %4, i64 -1
%9 = load i8, i8* %8
%10 = icmp eq i8 %9, 13
%11 = select i1 %10, i8* %8, i8* %4
br label %12
12: ; preds = %7, %3
%13 = phi i8* [ %11, %7 ], [ %4, %3 ]
br label %14
14: ; preds = %12, %17
%15 = phi i8* [ %18, %17 ], [ %13, %12 ]
%16 = icmp ugt i8* %15, %1
br i1 %16, label %17, label %20
17: ; preds = %14
%18 = getelementptr inbounds i8, i8* %15, i64 -1
%19 = load i8, i8* %18
switch i8 %19, label %14 [
i8 13, label %20
i8 10, label %20
i8 0, label %24
]
20: ; preds = %17, %17, %14
%21 = load i8, i8* %15
%22 = icmp eq i8 %21, 35
%23 = getelementptr inbounds i8, i8* %15, i64 -1
br i1 %22, label %3, label %24
24: ; preds = %20, %17
%25 = phi i8* [ %15, %17 ], [ %4, %20 ]
ret i8* %25
}