#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 */
scalar_t__ isalpha(char const);
scalar_t__ isdigit(char const);
int mcp_intern_is_ident(const char **in, char *buf, int buflen) {
  int origbuflen = buflen;
  if (!isalpha(**in) && **in != '_')
    return 0;
  while (isalpha(**in) || **in == '_' || isdigit(**in) || **in == '-') {
    if (--buflen > 0) {
      *buf++ = **in;
    }
    (*in)++;
  }
  if (origbuflen > 0)
    *buf = '\0';
  return 1;
}


x86 assembly (clang, -O0):
<mcp_intern_is_ident>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%edi
call   1040 <isalpha@plt>
cmp    $0x0,%rax
jne    1171 <mcp_intern_is_ident+0x51>
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%eax
cmp    $0x5f,%eax
je     1171 <mcp_intern_is_ident+0x51>
movl   $0x0,-0x4(%rbp)
jmp    124a <mcp_intern_is_ident+0x12a>
jmp    1176 <mcp_intern_is_ident+0x56>
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%edi
call   1040 <isalpha@plt>
mov    %rax,%rcx
mov    $0x1,%al
cmp    $0x0,%rcx
mov    %al,-0x21(%rbp)
jne    11e3 <mcp_intern_is_ident+0xc3>
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%ecx
mov    $0x1,%al
cmp    $0x5f,%ecx
mov    %al,-0x21(%rbp)
je     11e3 <mcp_intern_is_ident+0xc3>
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%edi
call   1030 <isdigit@plt>
mov    %rax,%rcx
mov    $0x1,%al
cmp    $0x0,%rcx
mov    %al,-0x21(%rbp)
jne    11e3 <mcp_intern_is_ident+0xc3>
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
sete   %al
mov    %al,-0x21(%rbp)
mov    -0x21(%rbp),%al
test   $0x1,%al
jne    11f3 <mcp_intern_is_ident+0xd3>
jmp    1232 <mcp_intern_is_ident+0x112>
mov    -0x1c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x1c(%rbp)
cmp    $0x0,%eax
jle    121f <mcp_intern_is_ident+0xff>
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
mov    (%rax),%cl
mov    -0x18(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x18(%rbp)
mov    %cl,(%rax)
mov    -0x10(%rbp),%rax
mov    (%rax),%rcx
add    $0x1,%rcx
mov    %rcx,(%rax)
jmp    1176 <mcp_intern_is_ident+0x56>
cmpl   $0x0,-0x20(%rbp)
jle    1243 <mcp_intern_is_ident+0x123>
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<mcp_intern_is_ident>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
mov    %edx,%r14d
mov    %rsi,%r15
mov    %rdi,%rbp
mov    (%rdi),%rax
movsbl (%rax),%edi
call   1040 <isalpha@plt>
mov    0x0(%rbp),%rcx
test   %rax,%rax
jne    114b <mcp_intern_is_ident+0x2b>
xor    %eax,%eax
cmpb   $0x5f,(%rcx)
jne    11b3 <mcp_intern_is_ident+0x93>
mov    %r14d,%ebx
jmp    115f <mcp_intern_is_ident+0x3f>
mov    0x0(%rbp),%rcx
add    $0x1,%rcx
mov    %rcx,0x0(%rbp)
add    $0xffffffff,%ebx
movsbl (%rcx),%edi
call   1040 <isalpha@plt>
test   %rax,%rax
jne    1190 <mcp_intern_is_ident+0x70>
mov    0x0(%rbp),%rax
movzbl (%rax),%eax
cmp    $0x5f,%al
je     1190 <mcp_intern_is_ident+0x70>
movsbl %al,%edi
call   1030 <isdigit@plt>
test   %rax,%rax
jne    1190 <mcp_intern_is_ident+0x70>
mov    0x0(%rbp),%rax
cmpb   $0x2d,(%rax)
jne    11a5 <mcp_intern_is_ident+0x85>
nopl   (%rax)
cmp    $0x2,%ebx
jl     1150 <mcp_intern_is_ident+0x30>
mov    0x0(%rbp),%rax
movzbl (%rax),%eax
mov    %al,(%r15)
add    $0x1,%r15
jmp    1150 <mcp_intern_is_ident+0x30>
mov    $0x1,%eax
test   %r14d,%r14d
jle    11b3 <mcp_intern_is_ident+0x93>
movb   $0x0,(%r15)
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define i32 @mcp_intern_is_ident(i8** nocapture %0, i8* nocapture writeonly %1, i32 %2) {
%4 = load i8*, i8** %0
%5 = load i8, i8* %4
%6 = tail call i64 @isalpha(i8 signext %5)
%7 = icmp eq i64 %6, 0
%8 = load i8*, i8** %0
br i1 %7, label %9, label %12
9: ; preds = %3
%10 = load i8, i8* %8
%11 = icmp eq i8 %10, 95
br i1 %11, label %12, label %45
12: ; preds = %3, %9
br label %13
13: ; preds = %12, %38
%14 = phi i8* [ %41, %38 ], [ %8, %12 ]
%15 = phi i8* [ %39, %38 ], [ %1, %12 ]
%16 = phi i32 [ %32, %38 ], [ %2, %12 ]
%17 = load i8, i8* %14
%18 = tail call i64 @isalpha(i8 signext %17)
%19 = icmp eq i64 %18, 0
br i1 %19, label %20, label %31
20: ; preds = %13
%21 = load i8*, i8** %0
%22 = load i8, i8* %21
%23 = icmp eq i8 %22, 95
br i1 %23, label %31, label %24
24: ; preds = %20
%25 = tail call i64 @isdigit(i8 signext %22)
%26 = icmp eq i64 %25, 0
br i1 %26, label %27, label %31
27: ; preds = %24
%28 = load i8*, i8** %0
%29 = load i8, i8* %28
%30 = icmp eq i8 %29, 45
br i1 %30, label %31, label %42
31: ; preds = %13, %20, %24, %27
%32 = add nsw i32 %16, -1
%33 = icmp sgt i32 %16, 1
br i1 %33, label %34, label %38
34: ; preds = %31
%35 = load i8*, i8** %0
%36 = load i8, i8* %35
%37 = getelementptr inbounds i8, i8* %15, i64 1
store i8 %36, i8* %15
br label %38
38: ; preds = %34, %31
%39 = phi i8* [ %37, %34 ], [ %15, %31 ]
%40 = load i8*, i8** %0
%41 = getelementptr inbounds i8, i8* %40, i64 1
store i8* %41, i8** %0
br label %13
42: ; preds = %27
%43 = icmp sgt i32 %2, 0
br i1 %43, label %44, label %45
44: ; preds = %42
store i8 0, i8* %15
br label %45
45: ; preds = %42, %44, %9
%46 = phi i32 [ 0, %9 ], [ 1, %44 ], [ 1, %42 ]
ret i32 %46
}