int lstptr_(int *lpl, int *nb, int *list, int *lptr) {
  int ret_val;
  static int nd, lp;
  --lptr;
  --list;
  lp = lptr[*lpl];
L1:
  nd = list[lp];
  if (nd == *nb) {
    goto L2;
  }
  lp = lptr[lp];
  if (lp != *lpl) {
    goto L1;
  }
L2:
  ret_val = lp;
  return ret_val;
}


x86 assembly (clang, -O0):
<lstptr_>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    -0x20(%rbp),%rax
add    $0xfffffffffffffffc,%rax
mov    %rax,-0x20(%rbp)
mov    -0x18(%rbp),%rax
add    $0xfffffffffffffffc,%rax
mov    %rax,-0x18(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x8(%rbp),%rcx
movslq (%rcx),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,0x2ee8(%rip)
mov    -0x18(%rbp),%rax
movslq 0x2edd(%rip),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,0x2ed0(%rip)
mov    0x2eca(%rip),%eax
mov    -0x10(%rbp),%rcx
cmp    (%rcx),%eax
jne    116b <lstptr_+0x6b>
jmp    119b <lstptr_+0x9b>
mov    -0x20(%rbp),%rax
movslq 0x2eb2(%rip),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,0x2ea9(%rip)
mov    0x2ea3(%rip),%eax
mov    -0x8(%rbp),%rcx
cmp    (%rcx),%eax
je     1196 <lstptr_+0x96>
jmp    1140 <lstptr_+0x40>
jmp    119b <lstptr_+0x9b>
mov    0x2e87(%rip),%eax
mov    %eax,-0x24(%rbp)
mov    -0x24(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<lstptr_>:
movslq (%rdi),%r8
mov    -0x4(%rcx,%r8,4),%eax
mov    (%rsi),%esi
nopw   0x0(%rax,%rax,1)
movslq %eax,%rdi
cmp    %esi,-0x4(%rdx,%rdi,4)
je     1125 <lstptr_+0x25>
mov    -0x4(%rcx,%rdi,4),%eax
cmp    %r8d,%eax
jne    1110 <lstptr_+0x10>
mov    %r8d,%eax
ret

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

LLVM IR (-O2):
define i32 @lstptr_(i32* nocapture %0, i32* nocapture %1, i32* nocapture %2, i32* nocapture %3) {
%5 = getelementptr inbounds i32, i32* %3, i64 -1
%6 = getelementptr inbounds i32, i32* %2, i64 -1
%7 = load i32, i32* %0
%8 = sext i32 %7 to i64
%9 = getelementptr inbounds i32, i32* %5, i64 %8
%10 = load i32, i32* %9
%11 = load i32, i32* %1
br label %12
12: ; preds = %18, %4
%13 = phi i32 [ %20, %18 ], [ %10, %4 ]
%14 = sext i32 %13 to i64
%15 = getelementptr inbounds i32, i32* %6, i64 %14
%16 = load i32, i32* %15
%17 = icmp eq i32 %16, %11
br i1 %17, label %22, label %18
18: ; preds = %12
%19 = getelementptr inbounds i32, i32* %5, i64 %14
%20 = load i32, i32* %19
%21 = icmp eq i32 %20, %7
br i1 %21, label %22, label %12
22: ; preds = %18, %12
%23 = phi i32 [ %7, %18 ], [ %13, %12 ]
ret i32 %23
}