define(def, file) char *def;
struct inclist *file;
{
  char *val;
  val = def;
  while (isalnum(*val) || *val == '_')
    val++;
  if (*val)
    *val++ = '\0';
  while (*val == ' ' || *val == '\t')
    val++;
  if (!*val)
    val = "1";
  define2(def, val, file);
}


x86 assembly (clang, -O0):
<define>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
movsbl (%rax),%edi
call   1030 <isalnum@plt>
mov    %eax,%ecx
mov    $0x1,%al
cmp    $0x0,%ecx
mov    %al,-0x21(%rbp)
jne    1164 <define+0x44>
mov    -0x20(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x5f,%eax
sete   %al
mov    %al,-0x21(%rbp)
mov    -0x21(%rbp),%al
test   $0x1,%al
jne    1174 <define+0x54>
jmp    1185 <define+0x65>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    1138 <define+0x18>
mov    -0x20(%rbp),%rax
cmpb   $0x0,(%rax)
je     11a4 <define+0x84>
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x20(%rbp)
movb   $0x0,(%rax)
jmp    11a9 <define+0x89>
mov    -0x20(%rbp),%rax
movsbl (%rax),%ecx
mov    $0x1,%al
cmp    $0x20,%ecx
mov    %al,-0x22(%rbp)
je     11ce <define+0xae>
mov    -0x20(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x9,%eax
sete   %al
mov    %al,-0x22(%rbp)
mov    -0x22(%rbp),%al
test   $0x1,%al
jne    11de <define+0xbe>
jmp    11ef <define+0xcf>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    11a9 <define+0x89>
mov    -0x20(%rbp),%rax
cmpb   $0x0,(%rax)
jne    1207 <define+0xe7>
lea    0xdfd(%rip),%rax
mov    %rax,-0x20(%rbp)
mov    -0x10(%rbp),%rdi
mov    -0x20(%rbp),%rsi
mov    -0x18(%rbp),%rdx
mov    $0x0,%al
call   1040 <define2@plt>
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<define>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
mov    %rsi,%r14
mov    %rdi,%r15
mov    %rdi,%rbx
movzbl (%rbx),%ebp
movsbl %bpl,%edi
call   1030 <isalnum@plt>
add    $0x1,%rbx
test   %eax,%eax
jne    1130 <define+0x10>
cmp    $0x5f,%bpl
je     1130 <define+0x10>
lea    -0x1(%rbx),%rax
test   %bpl,%bpl
je     1158 <define+0x38>
movb   $0x0,(%rax)
jmp    1164 <define+0x44>
mov    %rax,%rbx
jmp    1164 <define+0x44>
nopl   (%rax)
add    $0x1,%rbx
movzbl (%rbx),%eax
cmp    $0x20,%al
je     1160 <define+0x40>
cmp    $0x9,%al
je     1160 <define+0x40>
test   %al,%al
lea    0xe88(%rip),%rax
cmove  %rax,%rbx
mov    %r15,%rdi
mov    %rbx,%rsi
mov    %r14,%rdx
xor    %eax,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
jmp    1040 <define2@plt>

LLVM IR (-O0):
%struct.inclist = type opaque
@.str = [2 x i8] c"1\00"
define i32 @define(i8* %0, %struct.inclist* %1) {
%3 = alloca i32
%4 = alloca i8*
%5 = alloca %struct.inclist*
%6 = alloca i8*
store i8* %0, i8** %4
store %struct.inclist* %1, %struct.inclist** %5
%7 = load i8*, i8** %4
store i8* %7, i8** %6
br label %8
8: ; preds = %21, %2
%9 = load i8*, i8** %6
%10 = load i8, i8* %9
%11 = sext i8 %10 to i32
%12 = call i32 @isalnum(i32 %11)
%13 = icmp ne i32 %12, 0
br i1 %13, label %19, label %14
14: ; preds = %8
%15 = load i8*, i8** %6
%16 = load i8, i8* %15
%17 = sext i8 %16 to i32
%18 = icmp eq i32 %17, 95
br label %19
19: ; preds = %14, %8
%20 = phi i1 [ true, %8 ], [ %18, %14 ]
br i1 %20, label %21, label %24
21: ; preds = %19
%22 = load i8*, i8** %6
%23 = getelementptr inbounds i8, i8* %22, i32 1
store i8* %23, i8** %6
br label %8
24: ; preds = %19
%25 = load i8*, i8** %6
%26 = load i8, i8* %25
%27 = icmp ne i8 %26, 0
br i1 %27, label %28, label %31
28: ; preds = %24
%29 = load i8*, i8** %6
%30 = getelementptr inbounds i8, i8* %29, i32 1
store i8* %30, i8** %6
store i8 0, i8* %29
br label %31
31: ; preds = %28, %24
br label %32
32: ; preds = %44, %31
%33 = load i8*, i8** %6
%34 = load i8, i8* %33
%35 = sext i8 %34 to i32
%36 = icmp eq i32 %35, 32
br i1 %36, label %42, label %37
37: ; preds = %32
%38 = load i8*, i8** %6
%39 = load i8, i8* %38
%40 = sext i8 %39 to i32
%41 = icmp eq i32 %40, 9
br label %42
42: ; preds = %37, %32
%43 = phi i1 [ true, %32 ], [ %41, %37 ]
br i1 %43, label %44, label %47
44: ; preds = %42
%45 = load i8*, i8** %6
%46 = getelementptr inbounds i8, i8* %45, i32 1
store i8* %46, i8** %6
br label %32
47: ; preds = %42
%48 = load i8*, i8** %6
%49 = load i8, i8* %48
%50 = icmp ne i8 %49, 0
br i1 %50, label %52, label %51
51: ; preds = %47
store i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str, i64 0, i64 0), i8** %6
br label %52
52: ; preds = %51, %47
%53 = load i8*, i8** %4
%54 = load i8*, i8** %6
%55 = load %struct.inclist*, %struct.inclist** %5
%56 = call i32 (i8*, i8*, %struct.inclist*, ...) bitcast (i32 (...)* @define2 to i32 (i8*, i8*, %struct.inclist*, ...)*)(i8* %53, i8* %54, %struct.inclist* %55)
%57 = load i32, i32* %3
ret i32 %57
}

LLVM IR (-O2):
%struct.inclist = type opaque
@.str = [2 x i8] c"1\00"
define i32 @define(i8* %0, %struct.inclist* %1) {
br label %3
3: ; preds = %3, %2
%4 = phi i8* [ %0, %2 ], [ %11, %3 ]
%5 = load i8, i8* %4
%6 = sext i8 %5 to i32
%7 = tail call i32 @isalnum(i32 %6)
%8 = icmp ne i32 %7, 0
%9 = icmp eq i8 %5, 95
%10 = select i1 %8, i1 true, i1 %9
%11 = getelementptr inbounds i8, i8* %4, i64 1
br i1 %10, label %3, label %12
12: ; preds = %3
%13 = icmp eq i8 %5, 0
br i1 %13, label %15, label %14
14: ; preds = %12
store i8 0, i8* %4
br label %15
15: ; preds = %14, %12
%16 = phi i8* [ %4, %12 ], [ %11, %14 ]
br label %17
17: ; preds = %15, %20
%18 = phi i8* [ %21, %20 ], [ %16, %15 ]
%19 = load i8, i8* %18
switch i8 %19, label %22 [
i8 32, label %20
i8 9, label %20
]
20: ; preds = %17, %17
%21 = getelementptr inbounds i8, i8* %18, i64 1
br label %17
22: ; preds = %17
%23 = icmp eq i8 %19, 0
%24 = select i1 %23, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str, i64 0, i64 0), i8* %18
%25 = tail call i32 (i8*, i8*, %struct.inclist*, ...) bitcast (i32 (...)* @define2 to i32 (i8*, i8*, %struct.inclist*, ...)*)(i8* %0, i8* %24, %struct.inclist* %1)
ret i32 undef
}