void get_num_arg(argv, j, i, numarg2, type, value) int i, j, numarg2;
char **argv, *type;
double *value;
{
  char *comp;
  comp = char_alloc(32);
  sprintf(comp, ": Missing argument (%s) ", argv[j]);
  if (i == numarg2)
    error_syntax(argv, comp);
  sprintf(comp, ": Incompatible argument (%s) ", argv[j]);
  if (argv[j + 1][0] == '-') {
    if (strlen(argv[j + 1]) == 1)
      error_syntax(argv, comp);
    if (!isdigit(argv[j + 1][1]) && argv[j + 1][0] != '.')
      error_syntax(argv, comp);
  } else if (!isdigit(argv[j + 1][0]) && argv[j + 1][0] != '.')
    error_syntax(argv, comp);
  sscanf(argv[j + 1], type, value);
  free((void *)comp);
}


x86 assembly (clang, -O0):
<get_num_arg>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %ecx,-0x14(%rbp)
mov    %r8,-0x20(%rbp)
mov    %r9,-0x28(%rbp)
mov    $0x20,%edi
mov    $0x0,%al
call   1060 <char_alloc@plt>
cltq
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rdi
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
mov    (%rax,%rcx,8),%rdx
lea    0xe4a(%rip),%rsi
mov    $0x0,%al
call   1090 <sprintf@plt>
mov    -0x10(%rbp),%eax
cmp    -0x14(%rbp),%eax
jne    11d8 <get_num_arg+0x68>
mov    -0x8(%rbp),%rdi
mov    -0x30(%rbp),%rsi
mov    $0x0,%al
call   1070 <error_syntax@plt>
mov    -0x30(%rbp),%rdi
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
mov    (%rax,%rcx,8),%rdx
lea    0xe2a(%rip),%rsi
mov    $0x0,%al
call   1090 <sprintf@plt>
mov    -0x8(%rbp),%rax
mov    -0xc(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
jne    1296 <get_num_arg+0x126>
mov    -0x8(%rbp),%rax
mov    -0xc(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rdi
call   1050 <strlen@plt>
cmp    $0x1,%rax
jne    1242 <get_num_arg+0xd2>
mov    -0x8(%rbp),%rdi
mov    -0x30(%rbp),%rsi
mov    $0x0,%al
call   1070 <error_syntax@plt>
mov    -0x8(%rbp),%rax
mov    -0xc(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movsbl 0x1(%rax),%edi
call   1040 <isdigit@plt>
cmp    $0x0,%eax
jne    1291 <get_num_arg+0x121>
mov    -0x8(%rbp),%rax
mov    -0xc(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
je     1291 <get_num_arg+0x121>
mov    -0x8(%rbp),%rdi
mov    -0x30(%rbp),%rsi
mov    $0x0,%al
call   1070 <error_syntax@plt>
jmp    12e9 <get_num_arg+0x179>
mov    -0x8(%rbp),%rax
mov    -0xc(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movsbl (%rax),%edi
call   1040 <isdigit@plt>
cmp    $0x0,%eax
jne    12e4 <get_num_arg+0x174>
mov    -0x8(%rbp),%rax
mov    -0xc(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
je     12e4 <get_num_arg+0x174>
mov    -0x8(%rbp),%rdi
mov    -0x30(%rbp),%rsi
mov    $0x0,%al
call   1070 <error_syntax@plt>
jmp    12e9 <get_num_arg+0x179>
mov    -0x8(%rbp),%rax
mov    -0xc(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rdi
mov    -0x20(%rbp),%rsi
mov    -0x28(%rbp),%rdx
mov    $0x0,%al
call   1080 <sscanf@plt>
mov    -0x30(%rbp),%rdi
call   1030 <free@plt>
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<get_num_arg>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %r9,0x10(%rsp)
mov    %r8,0x8(%rsp)
mov    %ecx,%ebx
mov    %edx,%r15d
mov    %esi,%r14d
mov    %rdi,%r13
mov    $0x20,%edi
xor    %eax,%eax
call   1050 <char_alloc@plt>
movslq %eax,%r12
movslq %r14d,%rbp
mov    0x0(%r13,%rbp,8),%rdx
lea    0xe5f(%rip),%rsi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <sprintf@plt>
cmp    %ebx,%r15d
jne    11bd <get_num_arg+0x5d>
mov    %r13,%rdi
mov    %r12,%rsi
xor    %eax,%eax
call   1060 <error_syntax@plt>
mov    0x0(%r13,%rbp,8),%rdx
lea    0xe50(%rip),%rsi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <sprintf@plt>
mov    0x8(%r13,%rbp,8),%rbx
add    $0x1,%rbp
movsbl (%rbx),%eax
cmp    $0x2d,%eax
jne    1221 <get_num_arg+0xc1>
mov    %rbx,%rdi
call   1040 <strlen@plt>
cmp    $0x1,%rax
jne    1204 <get_num_arg+0xa4>
mov    %r13,%rdi
mov    %r12,%rsi
xor    %eax,%eax
call   1060 <error_syntax@plt>
mov    0x0(%r13,%rbp,8),%rbx
movsbl 0x1(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0xa,%eax
mov    0x10(%rsp),%r14
mov    0x8(%rsp),%r15
jb     1244 <get_num_arg+0xe4>
cmpb   $0x2e,(%rbx)
jne    1237 <get_num_arg+0xd7>
jmp    1244 <get_num_arg+0xe4>
lea    -0x30(%rax),%ecx
cmp    $0xa,%ecx
mov    0x10(%rsp),%r14
mov    0x8(%rsp),%r15
jb     1244 <get_num_arg+0xe4>
cmp    $0x2e,%al
je     1244 <get_num_arg+0xe4>
mov    %r13,%rdi
mov    %r12,%rsi
xor    %eax,%eax
call   1060 <error_syntax@plt>
mov    0x0(%r13,%rbp,8),%rdi
mov    %r15,%rsi
mov    %r14,%rdx
xor    %eax,%eax
call   1070 <sscanf@plt>
mov    %r12,%rdi
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
jmp    1030 <free@plt>

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

LLVM IR (-O2):
@.str = [25 x i8] c": Missing argument (%s) \00"
@.str.1 = [30 x i8] c": Incompatible argument (%s) \00"
define void @get_num_arg(i8** %0, i32 %1, i32 %2, i32 %3, i8* nocapture %4, double* %5) {
%7 = tail call i32 (i32, ...) bitcast (i32 (...)* @char_alloc to i32 (i32, ...)*)(i32 32)
%8 = sext i32 %7 to i64
%9 = inttoptr i64 %8 to i8*
%10 = sext i32 %1 to i64
%11 = getelementptr inbounds i8*, i8** %0, i64 %10
%12 = load i8*, i8** %11
%13 = tail call i32 (i8*, i8*, ...) @sprintf(i8* dereferenceable(1) %9, i8* dereferenceable(1) getelementptr inbounds ([25 x i8], [25 x i8]* @.str, i64 0, i64 0), i8* %12)
%14 = icmp eq i32 %2, %3
br i1 %14, label %15, label %17
15: ; preds = %6
%16 = tail call i32 (i8**, i8*, ...) bitcast (i32 (...)* @error_syntax to i32 (i8**, i8*, ...)*)(i8** %0, i8* %9)
br label %17
17: ; preds = %15, %6
%18 = load i8*, i8** %11
%19 = tail call i32 (i8*, i8*, ...) @sprintf(i8* dereferenceable(1) %9, i8* dereferenceable(1) getelementptr inbounds ([30 x i8], [30 x i8]* @.str.1, i64 0, i64 0), i8* %18)
%20 = add nsw i32 %1, 1
%21 = sext i32 %20 to i64
%22 = getelementptr inbounds i8*, i8** %0, i64 %21
%23 = load i8*, i8** %22
%24 = load i8, i8* %23
%25 = icmp eq i8 %24, 45
br i1 %25, label %26, label %42
26: ; preds = %17
%27 = tail call i64 @strlen(i8* %23)
%28 = icmp eq i64 %27, 1
br i1 %28, label %29, label %32
29: ; preds = %26
%30 = tail call i32 (i8**, i8*, ...) bitcast (i32 (...)* @error_syntax to i32 (i8**, i8*, ...)*)(i8** %0, i8* %9)
%31 = load i8*, i8** %22
br label %32
32: ; preds = %29, %26
%33 = phi i8* [ %31, %29 ], [ %23, %26 ]
%34 = getelementptr inbounds i8, i8* %33, i64 1
%35 = load i8, i8* %34
%36 = sext i8 %35 to i32
%37 = add nsw i32 %36, -48
%38 = icmp ult i32 %37, 10
br i1 %38, label %50, label %39
39: ; preds = %32
%40 = load i8, i8* %33
%41 = icmp eq i8 %40, 46
br i1 %41, label %50, label %48
42: ; preds = %17
%43 = sext i8 %24 to i32
%44 = add nsw i32 %43, -48
%45 = icmp ult i32 %44, 10
%46 = icmp eq i8 %24, 46
%47 = select i1 %45, i1 true, i1 %46
br i1 %47, label %50, label %48
48: ; preds = %42, %39
%49 = tail call i32 (i8**, i8*, ...) bitcast (i32 (...)* @error_syntax to i32 (i8**, i8*, ...)*)(i8** %0, i8* %9)
br label %50
50: ; preds = %48, %42, %32, %39
%51 = load i8*, i8** %22
%52 = tail call i32 (i8*, i8*, ...) @sscanf(i8* %51, i8* %4, double* %5)
tail call void @free(i8* %9)
ret void
}