void GetItemname(ptr, itemname, indirection, dimensions,
                 dimension_size) char **ptr;
char *itemname;
int *indirection;
short *dimensions;
int dimension_size[4];
{
  char *tmp;
  char *iptr;
  char index[80];
  while (is_space_char(**ptr) && **ptr != '\0')
    Inc(ptr);
  *indirection = 0;
  while (**ptr == '*' || (is_space_char(**ptr) && **ptr != '\0')) {
    if (**ptr == '*')
      (*indirection)++;
    Inc(ptr);
  }
  tmp = itemname;
  while (is_alpha(**ptr)) {
    *tmp = *(*ptr);
    tmp++;
    Inc(ptr);
  }
  while (**ptr == '[') {
    iptr = index;
    while (**ptr != ']') {
      Inc(ptr);
      *iptr++ = **ptr;
    }
    *iptr = '\0';
    Inc(ptr);
    dimension_size[(*dimensions)++] = atoi(index);
  }
  *tmp = '\0';
}


x86 assembly (clang, -O0):
<GetItemname>:
push   %rbp
mov    %rsp,%rbp
sub    $0xa0,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%edi
mov    $0x0,%al
call   1040 <is_space_char@plt>
mov    %eax,%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x91(%rbp)
je     1199 <GetItemname+0x59>
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
setne  %al
mov    %al,-0x91(%rbp)
mov    -0x91(%rbp),%al
test   $0x1,%al
jne    11ac <GetItemname+0x6c>
jmp    11bc <GetItemname+0x7c>
mov    -0x8(%rbp),%rdi
mov    $0x0,%al
call   1030 <Inc@plt>
jmp    115f <GetItemname+0x1f>
mov    -0x18(%rbp),%rax
movl   $0x0,(%rax)
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%ecx
mov    $0x1,%al
cmp    $0x2a,%ecx
mov    %al,-0x92(%rbp)
je     1227 <GetItemname+0xe7>
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%edi
mov    $0x0,%al
call   1040 <is_space_char@plt>
mov    %eax,%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x93(%rbp)
je     121b <GetItemname+0xdb>
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
setne  %al
mov    %al,-0x93(%rbp)
mov    -0x93(%rbp),%al
mov    %al,-0x92(%rbp)
mov    -0x92(%rbp),%al
test   $0x1,%al
jne    123a <GetItemname+0xfa>
jmp    1268 <GetItemname+0x128>
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%eax
cmp    $0x2a,%eax
jne    1258 <GetItemname+0x118>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
mov    -0x8(%rbp),%rdi
mov    $0x0,%al
call   1030 <Inc@plt>
jmp    11c6 <GetItemname+0x86>
mov    -0x10(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%edi
mov    $0x0,%al
call   1060 <is_alpha@plt>
cmp    $0x0,%eax
je     12b5 <GetItemname+0x175>
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
mov    (%rax),%cl
mov    -0x30(%rbp),%rax
mov    %cl,(%rax)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
mov    -0x8(%rbp),%rdi
mov    $0x0,%al
call   1030 <Inc@plt>
jmp    1270 <GetItemname+0x130>
jmp    12ba <GetItemname+0x17a>
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%eax
cmp    $0x5b,%eax
jne    1358 <GetItemname+0x218>
lea    -0x90(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%eax
cmp    $0x5d,%eax
je     1315 <GetItemname+0x1d5>
mov    -0x8(%rbp),%rdi
mov    $0x0,%al
call   1030 <Inc@plt>
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
mov    (%rax),%cl
mov    -0x38(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x38(%rbp)
mov    %cl,(%rax)
jmp    12d8 <GetItemname+0x198>
mov    -0x38(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x8(%rbp),%rdi
mov    $0x0,%al
call   1030 <Inc@plt>
lea    -0x90(%rbp),%rdi
mov    $0x0,%al
call   1050 <atoi@plt>
mov    %eax,%edx
mov    -0x28(%rbp),%rax
mov    -0x20(%rbp),%rsi
mov    (%rsi),%cx
mov    %cx,%di
add    $0x1,%di
mov    %di,(%rsi)
movswq %cx,%rcx
mov    %edx,(%rax,%rcx,4)
jmp    12ba <GetItemname+0x17a>
mov    -0x30(%rbp),%rax
movb   $0x0,(%rax)
add    $0xa0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<GetItemname>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x58,%rsp
mov    %r8,%r14
mov    %rcx,%r15
mov    %rdx,%r13
mov    %rsi,%r12
mov    %rdi,%rbx
mov    (%rdi),%rax
movsbl (%rax),%edi
xor    %eax,%eax
call   1040 <is_space_char@plt>
test   %eax,%eax
je     1185 <GetItemname+0x45>
mov    (%rbx),%rax
cmpb   $0x0,(%rax)
je     1185 <GetItemname+0x45>
mov    %rbx,%rdi
xor    %eax,%eax
call   1030 <Inc@plt>
mov    (%rbx),%rax
jmp    1160 <GetItemname+0x20>
movl   $0x0,0x0(%r13)
jmp    119f <GetItemname+0x5f>
nop
addl   $0x1,0x0(%r13)
mov    %rbx,%rdi
xor    %eax,%eax
call   1030 <Inc@plt>
mov    (%rbx),%rax
movsbl (%rax),%edi
cmp    $0x2a,%edi
je     1190 <GetItemname+0x50>
xor    %eax,%eax
call   1040 <is_space_char@plt>
mov    (%rbx),%rcx
movsbl (%rcx),%edi
test   %eax,%eax
je     11ee <GetItemname+0xae>
cmp    $0x2a,%dil
je     1190 <GetItemname+0x50>
test   %dil,%dil
jne    1195 <GetItemname+0x55>
xor    %edi,%edi
jmp    11ee <GetItemname+0xae>
nopw   0x0(%rax,%rax,1)
mov    (%rbx),%rax
movzbl (%rax),%eax
mov    %al,(%r12)
add    $0x1,%r12
mov    %rbx,%rdi
xor    %eax,%eax
call   1030 <Inc@plt>
mov    (%rbx),%rax
movsbl (%rax),%edi
xor    %eax,%eax
call   1060 <is_alpha@plt>
test   %eax,%eax
jne    11d0 <GetItemname+0x90>
mov    (%rbx),%rax
cmpb   $0x5b,(%rax)
jne    125e <GetItemname+0x11e>
mov    %rsp,%r13
mov    %r13,%rbp
nopw   0x0(%rax,%rax,1)
mov    %rbx,%rdi
xor    %eax,%eax
call   1030 <Inc@plt>
mov    (%rbx),%rax
movzbl (%rax),%ecx
mov    %cl,0x0(%rbp)
add    $0x1,%rbp
cmpb   $0x5d,(%rax)
jne    1210 <GetItemname+0xd0>
movb   $0x0,0x0(%rbp)
mov    %rbx,%rdi
xor    %eax,%eax
call   1030 <Inc@plt>
mov    %r13,%rdi
xor    %eax,%eax
call   1050 <atoi@plt>
movswq (%r15),%rcx
lea    0x1(%rcx),%edx
mov    %dx,(%r15)
mov    %eax,(%r14,%rcx,4)
mov    (%rbx),%rax
cmpb   $0x5b,(%rax)
mov    %r13,%rbp
je     1210 <GetItemname+0xd0>
movb   $0x0,(%r12)
add    $0x58,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @GetItemname(i8** %0, i8* %1, i32* %2, i16* %3, i32* %4) {
%6 = alloca i8**
%7 = alloca i8*
%8 = alloca i32*
%9 = alloca i16*
%10 = alloca i32*
%11 = alloca i8*
%12 = alloca i8*
%13 = alloca [80 x i8]
store i8** %0, i8*** %6
store i8* %1, i8** %7
store i32* %2, i32** %8
store i16* %3, i16** %9
store i32* %4, i32** %10
br label %14
14: ; preds = %29, %5
%15 = load i8**, i8*** %6
%16 = load i8*, i8** %15
%17 = load i8, i8* %16
%18 = sext i8 %17 to i32
%19 = call i32 (i32, ...) bitcast (i32 (...)* @is_space_char to i32 (i32, ...)*)(i32 %18)
%20 = icmp ne i32 %19, 0
br i1 %20, label %21, label %27
21: ; preds = %14
%22 = load i8**, i8*** %6
%23 = load i8*, i8** %22
%24 = load i8, i8* %23
%25 = sext i8 %24 to i32
%26 = icmp ne i32 %25, 0
br label %27
27: ; preds = %21, %14
%28 = phi i1 [ false, %14 ], [ %26, %21 ]
br i1 %28, label %29, label %32
29: ; preds = %27
%30 = load i8**, i8*** %6
%31 = call i32 (i8**, ...) bitcast (i32 (...)* @Inc to i32 (i8**, ...)*)(i8** %30)
br label %14
32: ; preds = %27
%33 = load i32*, i32** %8
store i32 0, i32* %33
br label %34
34: ; preds = %67, %32
%35 = load i8**, i8*** %6
%36 = load i8*, i8** %35
%37 = load i8, i8* %36
%38 = sext i8 %37 to i32
%39 = icmp eq i32 %38, 42
br i1 %39, label %55, label %40
40: ; preds = %34
%41 = load i8**, i8*** %6
%42 = load i8*, i8** %41
%43 = load i8, i8* %42
%44 = sext i8 %43 to i32
%45 = call i32 (i32, ...) bitcast (i32 (...)* @is_space_char to i32 (i32, ...)*)(i32 %44)
%46 = icmp ne i32 %45, 0
br i1 %46, label %47, label %53
47: ; preds = %40
%48 = load i8**, i8*** %6
%49 = load i8*, i8** %48
%50 = load i8, i8* %49
%51 = sext i8 %50 to i32
%52 = icmp ne i32 %51, 0
br label %53
53: ; preds = %47, %40
%54 = phi i1 [ false, %40 ], [ %52, %47 ]
br label %55
55: ; preds = %53, %34
%56 = phi i1 [ true, %34 ], [ %54, %53 ]
br i1 %56, label %57, label %70
57: ; preds = %55
%58 = load i8**, i8*** %6
%59 = load i8*, i8** %58
%60 = load i8, i8* %59
%61 = sext i8 %60 to i32
%62 = icmp eq i32 %61, 42
br i1 %62, label %63, label %67
63: ; preds = %57
%64 = load i32*, i32** %8
%65 = load i32, i32* %64
%66 = add nsw i32 %65, 1
store i32 %66, i32* %64
br label %67
67: ; preds = %63, %57
%68 = load i8**, i8*** %6
%69 = call i32 (i8**, ...) bitcast (i32 (...)* @Inc to i32 (i8**, ...)*)(i8** %68)
br label %34
70: ; preds = %55
%71 = load i8*, i8** %7
store i8* %71, i8** %11
br label %72
72: ; preds = %79, %70
%73 = load i8**, i8*** %6
%74 = load i8*, i8** %73
%75 = load i8, i8* %74
%76 = sext i8 %75 to i32
%77 = call i32 (i32, ...) bitcast (i32 (...)* @is_alpha to i32 (i32, ...)*)(i32 %76)
%78 = icmp ne i32 %77, 0
br i1 %78, label %79, label %88
79: ; preds = %72
%80 = load i8**, i8*** %6
%81 = load i8*, i8** %80
%82 = load i8, i8* %81
%83 = load i8*, i8** %11
store i8 %82, i8* %83
%84 = load i8*, i8** %11
%85 = getelementptr inbounds i8, i8* %84, i32 1
store i8* %85, i8** %11
%86 = load i8**, i8*** %6
%87 = call i32 (i8**, ...) bitcast (i32 (...)* @Inc to i32 (i8**, ...)*)(i8** %86)
br label %72
88: ; preds = %72
br label %89
89: ; preds = %111, %88
%90 = load i8**, i8*** %6
%91 = load i8*, i8** %90
%92 = load i8, i8* %91
%93 = sext i8 %92 to i32
%94 = icmp eq i32 %93, 91
br i1 %94, label %95, label %123
95: ; preds = %89
%96 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
store i8* %96, i8** %12
br label %97
97: ; preds = %103, %95
%98 = load i8**, i8*** %6
%99 = load i8*, i8** %98
%100 = load i8, i8* %99
%101 = sext i8 %100 to i32
%102 = icmp ne i32 %101, 93
br i1 %102, label %103, label %111
103: ; preds = %97
%104 = load i8**, i8*** %6
%105 = call i32 (i8**, ...) bitcast (i32 (...)* @Inc to i32 (i8**, ...)*)(i8** %104)
%106 = load i8**, i8*** %6
%107 = load i8*, i8** %106
%108 = load i8, i8* %107
%109 = load i8*, i8** %12
%110 = getelementptr inbounds i8, i8* %109, i32 1
store i8* %110, i8** %12
store i8 %108, i8* %109
br label %97
111: ; preds = %97
%112 = load i8*, i8** %12
store i8 0, i8* %112
%113 = load i8**, i8*** %6
%114 = call i32 (i8**, ...) bitcast (i32 (...)* @Inc to i32 (i8**, ...)*)(i8** %113)
%115 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%116 = call i32 (i8*, ...) bitcast (i32 (...)* @atoi to i32 (i8*, ...)*)(i8* %115)
%117 = load i32*, i32** %10
%118 = load i16*, i16** %9
%119 = load i16, i16* %118
%120 = add i16 %119, 1
store i16 %120, i16* %118
%121 = sext i16 %119 to i64
%122 = getelementptr inbounds i32, i32* %117, i64 %121
store i32 %116, i32* %122
br label %89
123: ; preds = %89
%124 = load i8*, i8** %11
store i8 0, i8* %124
ret void
}

LLVM IR (-O2):
define void @GetItemname(i8** %0, i8* nocapture writeonly %1, i32* nocapture %2, i16* nocapture %3, i32* nocapture writeonly %4) {
%6 = alloca [80 x i8]
%7 = getelementptr inbounds [80 x i8], [80 x i8]* %6, i64 0, i64 0
%8 = load i8*, i8** %0
%9 = load i8, i8* %8
%10 = sext i8 %9 to i32
%11 = tail call i32 (i32, ...) bitcast (i32 (...)* @is_space_char to i32 (i32, ...)*)(i32 %10)
%12 = icmp eq i32 %11, 0
br i1 %12, label %24, label %13
13: ; preds = %5, %17
%14 = load i8*, i8** %0
%15 = load i8, i8* %14
%16 = icmp eq i8 %15, 0
br i1 %16, label %24, label %17
17: ; preds = %13
%18 = tail call i32 (i8**, ...) bitcast (i32 (...)* @Inc to i32 (i8**, ...)*)(i8** %0)
%19 = load i8*, i8** %0
%20 = load i8, i8* %19
%21 = sext i8 %20 to i32
%22 = tail call i32 (i32, ...) bitcast (i32 (...)* @is_space_char to i32 (i32, ...)*)(i32 %21)
%23 = icmp eq i32 %22, 0
br i1 %23, label %24, label %13
24: ; preds = %13, %17, %5
store i32 0, i32* %2
br label %25
25: ; preds = %41, %24
%26 = load i8*, i8** %0
%27 = load i8, i8* %26
%28 = icmp eq i8 %27, 42
br i1 %28, label %38, label %29
29: ; preds = %25
%30 = sext i8 %27 to i32
%31 = tail call i32 (i32, ...) bitcast (i32 (...)* @is_space_char to i32 (i32, ...)*)(i32 %30)
%32 = icmp eq i32 %31, 0
%33 = load i8*, i8** %0
%34 = load i8, i8* %33
br i1 %32, label %35, label %37
35: ; preds = %29
%36 = sext i8 %34 to i32
br label %43
37: ; preds = %29
switch i8 %34, label %41 [
i8 0, label %43
i8 42, label %38
]
38: ; preds = %37, %25
%39 = load i32, i32* %2
%40 = add nsw i32 %39, 1
store i32 %40, i32* %2
br label %41
41: ; preds = %37, %38
%42 = tail call i32 (i8**, ...) bitcast (i32 (...)* @Inc to i32 (i8**, ...)*)(i8** %0)
br label %25
43: ; preds = %37, %35
%44 = phi i32 [ %36, %35 ], [ 0, %37 ]
%45 = tail call i32 (i32, ...) bitcast (i32 (...)* @is_alpha to i32 (i32, ...)*)(i32 %44)
%46 = icmp eq i32 %45, 0
br i1 %46, label %47, label %52
47: ; preds = %52, %43
%48 = phi i8* [ %1, %43 ], [ %56, %52 ]
%49 = load i8*, i8** %0
%50 = load i8, i8* %49
%51 = icmp eq i8 %50, 91
br i1 %51, label %63, label %83
52: ; preds = %43, %52
%53 = phi i8* [ %56, %52 ], [ %1, %43 ]
%54 = load i8*, i8** %0
%55 = load i8, i8* %54
store i8 %55, i8* %53
%56 = getelementptr inbounds i8, i8* %53, i64 1
%57 = tail call i32 (i8**, ...) bitcast (i32 (...)* @Inc to i32 (i8**, ...)*)(i8** %0)
%58 = load i8*, i8** %0
%59 = load i8, i8* %58
%60 = sext i8 %59 to i32
%61 = tail call i32 (i32, ...) bitcast (i32 (...)* @is_alpha to i32 (i32, ...)*)(i32 %60)
%62 = icmp eq i32 %61, 0
br i1 %62, label %47, label %52
63: ; preds = %47, %71
%64 = phi i8* [ %72, %71 ], [ %7, %47 ]
%65 = call i32 (i8**, ...) bitcast (i32 (...)* @Inc to i32 (i8**, ...)*)(i8** %0)
%66 = load i8*, i8** %0
%67 = load i8, i8* %66
%68 = getelementptr inbounds i8, i8* %64, i64 1
store i8 %67, i8* %64
%69 = load i8, i8* %66
%70 = icmp eq i8 %69, 93
br i1 %70, label %73, label %71
71: ; preds = %63, %73
%72 = phi i8* [ %68, %63 ], [ %7, %73 ]
br label %63
73: ; preds = %63
store i8 0, i8* %68
%74 = call i32 (i8**, ...) bitcast (i32 (...)* @Inc to i32 (i8**, ...)*)(i8** %0)
%75 = call i32 (i8*, ...) bitcast (i32 (...)* @atoi to i32 (i8*, ...)*)(i8* %7)
%76 = load i16, i16* %3
%77 = add i16 %76, 1
store i16 %77, i16* %3
%78 = sext i16 %76 to i64
%79 = getelementptr inbounds i32, i32* %4, i64 %78
store i32 %75, i32* %79
%80 = load i8*, i8** %0
%81 = load i8, i8* %80
%82 = icmp eq i8 %81, 91
br i1 %82, label %71, label %83
83: ; preds = %73, %47
store i8 0, i8* %48
ret void
}