LLM4Binary/decompile-bench-makefile huggingface dataset:
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/ktree.c
// Function: find_best_discrete_split_3
void find_best_discrete_split_3(Korderingsplit* ksplit, int* rangelist, int* iter, int** featurecounts, int* nodecounts, double* bestgain)
{
 int* perm[3];
 perm[0] = first_permutation(rangelist[0]);
 do{
   perm[1] = first_permutation(rangelist[1]);
   do{
     perm[2] = first_permutation(rangelist[2]);
     do{
       update_best_discrete_split(ksplit, perm, rangelist, iter, featurecounts, nodecounts, bestgain);
     }while (next_permutation(perm[2], rangelist[2]));
     safe_free(perm[2]);
   }while (next_permutation(perm[1], rangelist[1]));
   safe_free(perm[1]);
 }while (next_permutation(perm[0], rangelist[0]));
 safe_free(perm[0]);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x68, %rsp
movq %r9, 0x48(%rsp)
movq %r8, 0x40(%rsp)
movq %rcx, 0x38(%rsp)
movq %rdx, 0x30(%rsp)
movq %rdi, 0x28(%rsp)
movq %rsi, 0x8(%rsp)
movl (%rsi), %edi
callq 0x34711
leaq 0x50(%rsp), %r14
movq %rax, 0x10(%rsp)
movq %rax, (%r14)
movq 0x40(%rsp), %r15
movq 0x38(%rsp), %r12
movq 0x30(%rsp), %rbp
movq 0x28(%rsp), %r13
movq 0x8(%rsp), %rbx
movq 0x8(%rsp), %rax
movl 0x4(%rax), %edi
callq 0x34711
movq %rax, 0x18(%rsp)
movq %rax, 0x58(%rsp)
movq 0x8(%rsp), %rax
movl 0x8(%rax), %edi
callq 0x34711
movq %rax, 0x20(%rsp)
movq %rax, 0x60(%rsp)
movq 0x48(%rsp), %rax
movq %rax, (%rsp)
movq %r13, %rdi
movq %r14, %rsi
movq %rbx, %rdx
movq %rbp, %rcx
movq %r12, %r8
movq %r15, %r9
callq 0x2e728
movl 0x8(%rbx), %esi
movq 0x20(%rsp), %rdi
callq 0x34b70
testl %eax, %eax
jne 0x2ea4e
movq 0x20(%rsp), %rdi
callq 0x34ff7
movq 0x8(%rsp), %rax
movl 0x4(%rax), %esi
movq 0x18(%rsp), %rdi
callq 0x34b70
testl %eax, %eax
jne 0x2ea37
movq 0x18(%rsp), %rdi
callq 0x34ff7
movq 0x8(%rsp), %rax
movl (%rax), %esi
movq 0x10(%rsp), %rdi
callq 0x34b70
testl %eax, %eax
jne 0x2ea20
movq 0x10(%rsp), %rdi
addq $0x68, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0x34ff7
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/ktree.c
// Function: find_best_discrete_split_4
void find_best_discrete_split_4(Korderingsplit* ksplit, int* rangelist, int* iter, int** featurecounts, int* nodecounts, double* bestgain)
{
 int* perm[4];
 perm[0] = first_permutation(rangelist[0]);
 do{
   perm[1] = first_permutation(rangelist[1]);
   do{
     perm[2] = first_permutation(rangelist[2]);
     do{
       perm[3] = first_permutation(rangelist[3]);
       do{
         update_best_discrete_split(ksplit, perm, rangelist, iter, featurecounts, nodecounts, bestgain);
       }while (next_permutation(perm[3], rangelist[3]));
       safe_free(perm[3]);
     }while (next_permutation(perm[2], rangelist[2]));
     safe_free(perm[2]);
   }while (next_permutation(perm[1], rangelist[1]));
   safe_free(perm[1]);
 }while (next_permutation(perm[0], rangelist[0]));
 safe_free(perm[0]);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x88, %rsp
movq %r9, 0x58(%rsp)
movq %r8, 0x50(%rsp)
movq %rcx, 0x48(%rsp)
movq %rdx, 0x40(%rsp)
movq %rdi, 0x38(%rsp)
movq %rsi, 0x10(%rsp)
movl (%rsi), %edi
callq 0x34711
leaq 0x60(%rsp), %r14
movq %rax, 0x18(%rsp)
movq %rax, (%r14)
movq 0x50(%rsp), %r15
movq 0x48(%rsp), %r12
movq 0x40(%rsp), %rbp
movq 0x38(%rsp), %r13
movq 0x10(%rsp), %rbx
movq 0x10(%rsp), %rax
movl 0x4(%rax), %edi
callq 0x34711
movq %rax, 0x20(%rsp)
movq %rax, 0x68(%rsp)
movq 0x10(%rsp), %rax
movl 0x8(%rax), %edi
callq 0x34711
movq %rax, 0x28(%rsp)
movq %rax, 0x70(%rsp)
movq 0x10(%rsp), %rax
movl 0xc(%rax), %edi
callq 0x34711
movq %rax, 0x30(%rsp)
movq %rax, 0x78(%rsp)
movq 0x58(%rsp), %rax
movq %rax, (%rsp)
movq %r13, %rdi
movq %r14, %rsi
movq %rbx, %rdx
movq %rbp, %rcx
movq %r12, %r8
movq %r15, %r9
callq 0x2e728
movl 0xc(%rbx), %esi
movq 0x30(%rsp), %rdi
callq 0x34b70
testl %eax, %eax
jne 0x2eb7b
movq 0x30(%rsp), %rdi
callq 0x34ff7
movq 0x10(%rsp), %rax
movl 0x8(%rax), %esi
movq 0x28(%rsp), %rdi
callq 0x34b70
testl %eax, %eax
jne 0x2eb64
movq 0x28(%rsp), %rdi
callq 0x34ff7
movq 0x10(%rsp), %rax
movl 0x4(%rax), %esi
movq 0x20(%rsp), %rdi
callq 0x34b70
testl %eax, %eax
jne 0x2eb4d
movq 0x20(%rsp), %rdi
callq 0x34ff7
movq 0x10(%rsp), %rax
movl (%rax), %esi
movq 0x18(%rsp), %rdi
callq 0x34b70
testl %eax, %eax
jne 0x2eb36
movq 0x18(%rsp), %rdi
addq $0x88, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0x34ff7
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/ktree.c
// Function: create_ktreechildren
int create_ktreechildren(Decisionnodeptr node, C45_parameterptr p)
{
 int i, bestdepth;
 double gain, bestgain = +INT_MAX;
 Korderingsplit ksplit, bestksplit;
 node->conditiontype = UNIVARIATE_CONDITION;
 if (!(can_be_divided(node, p)))
   return 1;
 node->featureno = DISCRETEMIX;
 node->ksplit.featurecount = get_parameter_i("smallsetsize");
 if (node->ksplit.featurecount == 0)
  {
   for (i = 1; i <= get_parameter_i("hybridspace"); i++)
    {
     ksplit = find_best_discrete_split(node, i, &gain);
     if (gain < bestgain)
      {
       bestgain = gain;
       bestdepth = i;
       bestksplit = ksplit;
      }
    }
   node->ksplit = bestksplit;
  }
 else
   node->ksplit = find_best_discrete_split(node, node->ksplit.featurecount, &gain);
 if (node->ksplit.featurecount == 0)
  {
   safe_free(node->ksplit.sortorder);
   safe_free(node->ksplit.featurelist);
   safe_free(node->ksplit.discretesplit);
   node->featureno = LEAF_NODE;
   return 1;
  }
 if (!(make_children_discrete(node)))
   return 1;
 create_ktreechildren(node->left, p);
 create_ktreechildren(node->right, p);
 return 1;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x68, %rsp
movq %rsi, %r12
movq %rdi, %rbx
andl $0x0, 0x98(%rdi)
callq 0x1abee
testl %eax, %eax
je 0x2f230
movl $0xfffffffb, 0x30(%rbx) # imm = 0xFFFFFFFB
leaq 0x66768(%rip), %rdi     # 0x95874
callq 0x4cd35
leaq 0x140(%rbx), %r14
movl %eax, 0x140(%rbx)
testl %eax, %eax
je 0x2f150
leaq 0x48(%rsp), %r15
leaq 0x10(%rsp), %rcx
movq %r15, %rdi
movq %rbx, %rsi
movl %eax, %edx
callq 0x2ec2e
movups (%r15), %xmm0
movups 0x10(%r15), %xmm1
movups %xmm1, 0x10(%r14)
movups %xmm0, (%r14)
jmp 0x2f1dd
movq %r12, 0x18(%rsp)
movsd 0x663bb(%rip), %xmm0    # 0x95518
movsd %xmm0, 0x8(%rsp)
pushq $0x1
popq %rbp
leaq 0x69aab(%rip), %r15     # 0x98c18
leaq 0x48(%rsp), %r12
leaq 0x10(%rsp), %r13
movq %r15, %rdi
callq 0x4cd35
cmpl %eax, %ebp
jg 0x2f1c5
movq %r12, %rdi
movq %rbx, %rsi
movl %ebp, %edx
movq %r13, %rcx
callq 0x2ec2e
movsd 0x10(%rsp), %xmm0
movsd 0x8(%rsp), %xmm1
ucomisd %xmm0, %xmm1
jbe 0x2f1c1
movupd 0x48(%rsp), %xmm1
movups 0x58(%rsp), %xmm2
movaps %xmm2, 0x30(%rsp)
movapd %xmm1, 0x20(%rsp)
movsd %xmm0, 0x8(%rsp)
incl %ebp
jmp 0x2f177
movaps 0x20(%rsp), %xmm0
movaps 0x30(%rsp), %xmm1
movups %xmm1, 0x10(%r14)
movups %xmm0, (%r14)
movq 0x18(%rsp), %r12
cmpl $0x0, (%r14)
je 0x2f208
movq %rbx, %rdi
callq 0x2eed0
testl %eax, %eax
je 0x2f230
movq (%rbx), %rdi
movq %r12, %rsi
callq 0x2f0d6
movq 0x8(%rbx), %rdi
movq %r12, %rsi
callq 0x2f0d6
jmp 0x2f230
movq 0x158(%rbx), %rdi
callq 0x34ff7
movq 0x148(%rbx), %rdi
callq 0x34ff7
movq 0x150(%rbx), %rdi
callq 0x34ff7
orl $-0x1, 0x30(%rbx)
pushq $0x1
popq %rax
addq $0x68, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
nop
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: goto_endconstructor
void goto_endconstructor(int* variable, char* constructorname, char* endconstructorname, char** code, int linecount, int* instruction_pointer)
{
 /*!Last Changed 14.07.2006*/
 char templine[READLINELENGTH], *p;
 int howmany = 1, i;
 *variable = 0;
 for (i = *instruction_pointer + 1; i < linecount; i++)
  {
   strcpy(templine, code[i]);
   p = strtok(templine," \t\n");
   if (strcmp(p, constructorname) == 0)
     howmany++;
   else
     if (strcmp(p, endconstructorname) == 0)
      {
       howmany--;
       if (howmany == 0)
         break;
      }
  }
 *instruction_pointer = i;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x7a148, %rsp          # imm = 0x7A148
andl $0x0, (%rdi)
movq %rcx, 0x18(%rsp)
movq %rdx, 0x10(%rsp)
movq %r9, 0x8(%rsp)
movslq (%r9), %r15
movslq %r8d, %rbp
leal 0x1(%r15), %eax
cmpl %eax, %ebp
cmovgl %ebp, %eax
movl %eax, 0x4(%rsp)
movq %rsi, %r12
pushq $0x1
popq %rax
leaq 0x20(%rsp), %r13
movl %eax, (%rsp)
leaq 0x1(%r15), %rcx
movl %r15d, %r14d
cmpq %rbp, %rcx
jge 0x2f2f1
movq %rcx, %r15
movq 0x18(%rsp), %rax
movq (%rax,%rcx,8), %rsi
movq %r13, %rdi
callq 0x4270
movq %r13, %rdi
leaq 0x69e57(%rip), %rsi     # 0x99109
callq 0x4280
movq %rax, %rbx
movq %rax, %rdi
movq %r12, %rsi
callq 0x4260
testl %eax, %eax
je 0x2f2ea
movq %rbx, %rdi
movq 0x10(%rsp), %rsi
callq 0x4260
leaq 0x1(%r15), %rcx
incl %r14d
testl %eax, %eax
jne 0x2f28f
movl (%rsp), %eax
decl %eax
jne 0x2f285
jmp 0x2f2f6
movl (%rsp), %eax
incl %eax
jmp 0x2f285
movl 0x4(%rsp), %r14d
movq 0x8(%rsp), %rax
movl %r14d, (%rax)
addq $0x7a148, %rsp          # imm = 0x7A148
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: set_variable
int set_variable(char* name, void* value)
{
 /*!Last Changed 22.12.2006 added matrix type*/
 /*!Last Changed 03.01.2006*/
	/*!Last Changed 05.11.2003 Added File variable with type 4*/
 /*!Last Changed 02.05.2002*/
 variableptr myvar;
 myvar = get_variable(name);
 if (!myvar)
  {
   printf(m1437, name);
   return 0;
  }
 switch (myvar->type)
  {
   case INTEGER_TYPE:myvar->value.intvalue = atoi((char *)value);
                     break;
   case REAL_TYPE   :myvar->value.floatvalue = atof((char *)value);
                     break;
   case ARRAY_TYPE  :set_multidimensional_array(myvar, value);
                     break;
   case STRING_TYPE :
			case FILE_TYPE   :if (myvar->value.stringvalue)
                       safe_free(myvar->value.stringvalue);
                     myvar->value.stringvalue = strcopy(myvar->value.stringvalue, (char *)value);
                     break;
   case MATRIX_TYPE :if (myvar->value.matrixvalue)
																					 {
																						 matrix_free(*(myvar->value.matrixvalue));
																						 safe_free(myvar->value.matrixvalue);
                       myvar->value.matrixvalue = NULL;
																					 }
                     if (strcmp((char *)value, "0") != 0)
  				                 myvar->value.matrixvalue = (matrixptr)value;
                     break;
   default          :break;
  }
 return 1;
}

// Assembly:
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
pushq %rax
movq %rsi, %r15
movq %rdi, %r12
callq 0x3092c
testq %rax, %rax
je 0x2f54e
movq %rax, %r14
movl (%rax), %eax
pushq $0x1
popq %rbx
cmpq $0x5, %rax
ja 0x2f5d2
leaq 0x69767(%rip), %rcx     # 0x98c94
movslq (%rcx,%rax,4), %rax
addq %rcx, %rax
jmpq *%rax
movq 0x28(%r14), %rdi
testq %rdi, %rdi
je 0x2f5c4
callq 0x34ff7
movq 0x28(%r14), %rdi
jmp 0x2f5c6
leaq 0x6a08e(%rip), %rdi     # 0x995e3
xorl %ebx, %ebx
movq %r12, %rsi
xorl %eax, %eax
callq 0x4030
jmp 0x2f5d2
movq %r15, %rdi
callq 0x4200
movl %eax, 0x28(%r14)
jmp 0x2f5d2
movq %r15, %rdi
callq 0x4130
movsd %xmm0, 0x28(%r14)
jmp 0x2f5d2
movq 0x28(%r14), %rax
testq %rax, %rax
je 0x2f5a4
movq (%rax), %rdi
movq 0x8(%rax), %rsi
callq 0x3929f
movq 0x28(%r14), %rdi
callq 0x34ff7
andq $0x0, 0x28(%r14)
cmpb $0x30, (%r15)
jne 0x2f5b1
cmpb $0x0, 0x1(%r15)
je 0x2f5d2
movq %r15, 0x28(%r14)
jmp 0x2f5d2
movq %r14, %rdi
movq %r15, %rsi
callq 0x31459
jmp 0x2f5d2
xorl %edi, %edi
movq %r15, %rsi
callq 0x3604c
movq %rax, 0x28(%r14)
movl %ebx, %eax
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: check_parameter_type
int check_parameter_type(char* varname, VARIABLE_TYPE vartype, variableptr variables, int variablecount)
{
 /*!Last Changed 21.12.2006*/
 int k;
 Variable myvar;
 k = return_variable_index(varname, variables, variablecount);
 if (k == -1)
   return FAILURE;
 else
  {
   myvar = variables[k];
   while (myvar.type == ARRAY_TYPE) 
     myvar = myvar.value.array[0];
   if (myvar.type != vartype)
     return FAILURE;
  }
 return SUCCESS; 
}

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rdx, %r14
movl %esi, %ebx
movq %rdx, %rsi
movl %ecx, %edx
callq 0x2f622
cmpl $-0x1, %eax
je 0x2f618
cltq
imulq $0x30, %rax, %rax
addq %rax, %r14
movl (%r14), %ecx
cmpl $0x3, %ecx
jne 0x2f60f
movq 0x28(%r14), %r14
jmp 0x2f601
xorl %eax, %eax
cmpl %ebx, %ecx
sete %al
jmp 0x2f61a
xorl %eax, %eax
addq $0x8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: return_variable_index
int return_variable_index(char* name, variableptr vars, int varcount)
{
 /*!Last Changed 02.05.2002*/
 int i;
 char* st = array_variable(name);
 if (st)
  {
   for (i = 0; i < varcount; i++)
     if (strcmp(st, vars[i].name) == 0)
      {
       safe_free(st);
       return i;
      }
  }
 else
  {
   for (i = 0; i < varcount; i++)
     if (strcmp(name, vars[i].name)==0)
       return i;
  }
	if (st)
		 safe_free(st);
 return -1;
}

// Assembly:
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
movl %edx, %ebx
movq %rsi, %r15
movq %rdi, %r12
callq 0x30b99
movq %rax, %r14
xorl %r13d, %r13d
testl %ebx, %ebx
cmovgl %ebx, %r13d
addq $0x18, %r15
xorl %ebx, %ebx
testq %rax, %rax
je 0x2f682
cmpq %rbx, %r13
je 0x2f687
movq (%r15), %rsi
movq %r14, %rdi
callq 0x4260
testl %eax, %eax
je 0x2f68f
incq %rbx
addq $0x30, %r15
jmp 0x2f64f
movq (%r15), %rsi
movq %r12, %rdi
callq 0x4260
testl %eax, %eax
je 0x2f697
incq %rbx
addq $0x30, %r15
cmpq %rbx, %r13
jne 0x2f66c
pushq $-0x1
popq %rbx
testq %r14, %r14
je 0x2f697
movq %r14, %rdi
callq 0x34ff7
movl %ebx, %eax
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: add_default_variables
void add_default_variables(variableptr* variables, int* variablecount)
{
	/*!Last Changed 06.08.2007*/
 add_variable(REAL_TYPE, default_variables, DEFAULT_VARIABLE_COUNT, variables, variablecount);
 add_variable(STRING_TYPE, default_string_variables, DEFAULT_STRING_VARIABLE_COUNT, variables, variablecount);
 add_variable(STRING_TYPE, default_array_variables, DEFAULT_ARRAY_VARIABLE_COUNT, variables, variablecount);
 add_variable(STRING_TYPE, default_performance_variables, DEFAULT_PERFORMANCE_VARIABLE_COUNT, variables, variablecount);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %rbx
movq %rdi, %r14
leaq 0x9d469(%rip), %rsi     # 0xccde0
pushq $0x1
popq %rdi
pushq $0xa
popq %rbp
movl %ebp, %edx
movq %r14, %rcx
movq %rbx, %r8
callq 0x2f9df
leaq 0x9d49f(%rip), %rsi     # 0xcce30
pushq $0x2
popq %r15
movl %r15d, %edi
movl %ebp, %edx
movq %r14, %rcx
movq %rbx, %r8
callq 0x2f9df
leaq 0x9d4d4(%rip), %rsi     # 0xcce80
pushq $0x1e
popq %rdx
movl %r15d, %edi
movq %r14, %rcx
movq %rbx, %r8
callq 0x2f9df
leaq 0x9d5ac(%rip), %rsi     # 0xccf70
movl %r15d, %edi
movl %r15d, %edx
movq %r14, %rcx
movq %rbx, %r8
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
jmp 0x2f9df
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: add_variable
int add_variable(VARIABLE_TYPE type, char** names, int count, variableptr* vars, int* varcount)
{
 /*!Last Changed 04.01.2006 added create_multidimensional_array*/
	/*!Last Changed 29.11.2004 added arraysize*/
	/*!Last Changed 02.02.2004 added safemalloc*/
 /*!Last Changed 02.05.2002*/
 int i, j, result = 1, *dimensions, dimcount;
 char* st;
 for (j = 0; j < count; j++)
  {
   i = return_variable_index(names[j], *vars, *varcount);
   if (i != -1)
			 {
				 result = 0;
     continue;
			 }
   *vars = (variableptr)alloc(*vars, sizeof(Variable) * (*varcount + 1), *varcount + 1);
   st = array_variable(names[j]);
   if (st)
    {
     (*vars)[*varcount].type = ARRAY_TYPE;
     (*vars)[*varcount].name = strcopy((*vars)[*varcount].name, st);
     dimensions = array_sizes(names[j], &dimcount);
     create_multidimensional_array(&((*vars)[*varcount]), dimensions, 0, dimcount, type);
     safe_free(dimensions);
     safe_free(st);
    }
   else
    {
				 (*vars)[*varcount].arraysize = 0;
     (*vars)[*varcount].type = type;
     (*vars)[*varcount].name = strcopy((*vars)[*varcount].name, names[j]);
     set_default_value(&((*vars)[*varcount]));
    }
   (*varcount)++;
  }
 return result;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movq %r8, %rbx
movq %rcx, %r14
movl %edx, %r15d
movq %rsi, %r12
movl %edi, 0x4(%rsp)
xorl %r13d, %r13d
testl %edx, %edx
cmovlel %r13d, %r15d
pushq $0x1
popq %rbp
movq %rsi, 0x10(%rsp)
cmpq %r13, %r15
je 0x2fb28
movq (%r12,%r13,8), %rdi
movq (%r14), %rsi
movl (%rbx), %edx
callq 0x2f622
xorl %ecx, %ecx
cmpl $-0x1, %eax
jne 0x2fb1e
movl %ebp, 0x8(%rsp)
movq (%r14), %rdi
movslq (%rbx), %rdx
incq %rdx
imulq $0x30, %rdx, %rsi
callq 0x34f30
movq %rax, (%r14)
movq (%r12,%r13,8), %rdi
callq 0x30b99
movq %rax, %rbp
movq (%r14), %rax
movslq (%rbx), %rcx
imulq $0x30, %rcx, %rcx
testq %rbp, %rbp
je 0x2fad9
movl $0x3, (%rax,%rcx)
movslq (%rbx), %rcx
imulq $0x30, %rcx, %rcx
movq 0x18(%rax,%rcx), %rdi
movq %rbp, %rsi
callq 0x3604c
movq (%r14), %rcx
movslq (%rbx), %rdx
imulq $0x30, %rdx, %rdx
movq %rax, 0x18(%rcx,%rdx)
movq (%r12,%r13,8), %rdi
leaq 0xc(%rsp), %rsi
callq 0x30f30
movq %r15, %r12
movq %rax, %r15
movslq (%rbx), %rax
imulq $0x30, %rax, %rdi
addq (%r14), %rdi
movl 0xc(%rsp), %ecx
movq %r15, %rsi
xorl %edx, %edx
movl 0x4(%rsp), %r8d
callq 0x315b7
movq %r15, %rdi
movq %r12, %r15
movq 0x10(%rsp), %r12
callq 0x34ff7
movq %rbp, %rdi
callq 0x34ff7
jmp 0x2fb18
andl $0x0, 0x20(%rax,%rcx)
movslq (%rbx), %rcx
imulq $0x30, %rcx, %rcx
movl 0x4(%rsp), %edx
movl %edx, (%rax,%rcx)
movslq (%rbx), %rcx
imulq $0x30, %rcx, %rcx
movq 0x18(%rax,%rcx), %rdi
movq (%r12,%r13,8), %rsi
callq 0x3604c
movq (%r14), %rcx
movslq (%rbx), %rdx
imulq $0x30, %rdx, %rdi
movq %rax, 0x18(%rcx,%rdi)
addq (%r14), %rdi
callq 0x31431
incl (%rbx)
movl 0x8(%rsp), %ecx
incq %r13
movl %ecx, %ebp
jmp 0x2fa0e
movl %ebp, %eax
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: check_of_variables
int check_of_variables(char* st, variableptr variables, int variablecount)
{
	/*!Last Changed 12.10.2004*/
	int i = 0, len = strlen(st), mode = 0, start, end, j;
	char varname[READLINELENGTH];
	while (i < len)
	 {
		 if (st[i] == '%')
			 {
				 mode = (mode + 1) % 2;
					if (mode == 1)
						 start = i + 1;
					else
					 {
						 end = i - 1;
							if (start < end)
							 {
								 for (j = start; j <= end; j++)
										 varname[j - start] = st[j];
									varname[j - start] = '\0';
         if (return_variable_index(varname, variables, variablecount) == -1)
										 return 0;
							 }
					 }
			 }
		 i++;
	 }
	return 1;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x7a138, %rsp          # imm = 0x7A138
movl %edx, 0xc(%rsp)
movq %rsi, %r14
movq %rdi, %r15
callq 0x4190
movq %rax, %r12
xorl %ebp, %ebp
testl %r12d, %r12d
cmovlel %ebp, %r12d
pushq $0x1
popq %r13
xorl %eax, %eax
cmpq %r12, %rbp
je 0x303cc
cmpb $0x25, (%r15,%rbp)
jne 0x303c7
testb $0x1, %al
jne 0x3037b
leal 0x1(%rbp), %ebx
movl %r13d, %eax
jmp 0x303c7
leaq -0x1(%rbp), %rdx
movslq %ebx, %rcx
xorl %eax, %eax
cmpq %rcx, %rdx
jle 0x303c7
leaq (%r15,%rcx), %rdx
xorl %eax, %eax
leaq (%rcx,%rax), %rsi
cmpq %rbp, %rsi
jge 0x303a6
movb (%rdx,%rax), %sil
movb %sil, 0x10(%rsp,%rax)
incq %rax
jmp 0x3038f
cltq
movb $0x0, 0x10(%rsp,%rax)
leaq 0x10(%rsp), %rdi
movq %r14, %rsi
movl 0xc(%rsp), %edx
callq 0x2f622
movl %eax, %ecx
xorl %eax, %eax
cmpl $-0x1, %ecx
je 0x303cf
incq %rbp
jmp 0x30363
movl %r13d, %eax
addq $0x7a138, %rsp          # imm = 0x7A138
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: free_variables
void free_variables(variableptr vars, int count)
{
 /*!Last Changed 22.12.2006 added matrix type*/
 /*!Last Changed 04.01.2006 added free_multidimensional_array*/
	/*!Last Changed 29.11.2004*/
	int i;
 for (i = 0; i < count; i++)
	 {
		 safe_free(vars[i].name);
			switch (vars[i].type)
			 {
			  case INTEGER_TYPE:
					case REAL_TYPE   :break;
					case STRING_TYPE :
					case FILE_TYPE   :if (vars[i].value.stringvalue)
													            safe_free(vars[i].value.stringvalue);
						                 break;
     case MATRIX_TYPE :if (vars[i].value.matrixvalue)
                        {
                         matrix_free(*(vars[i].value.matrixvalue));
                         safe_free(vars[i].value.matrixvalue);
                        }
                       break;
					case ARRAY_TYPE  :free_multidimensional_array(&(vars[i]));
												           break;
     default          :break;
			 }
	 }
}

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
movq %rdi, %rbx
xorl %r14d, %r14d
testl %esi, %esi
cmovgl %esi, %r14d
leaq 0x68923(%rip), %r15     # 0x98d1c
subq $0x1, %r14
jb 0x30454
movq 0x18(%rbx), %rdi
callq 0x34ff7
movl (%rbx), %eax
addl $-0x2, %eax
cmpl $0x3, %eax
ja 0x3044e
movslq (%r15,%rax,4), %rax
addq %r15, %rax
jmpq *%rax
movq 0x28(%rbx), %rdi
testq %rdi, %rdi
jne 0x30449
jmp 0x3044e
movq %rbx, %rdi
callq 0x3151a
jmp 0x3044e
movq 0x28(%rbx), %rax
testq %rax, %rax
je 0x3044e
movq (%rax), %rdi
movq 0x8(%rax), %rsi
callq 0x3929f
movq 0x28(%rbx), %rdi
callq 0x34ff7
addq $0x30, %rbx
jmp 0x303f9
popq %rbx
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: charatindex
void charatindex(char* name, int index)
{
	/*!Last Changed 27.01.2004*/
	char* st;
	char message[2];
	st = get_string_value(name);
	if (!st)
		 return;
	sprintf(message, "%c", st[index - 1]);
	set_default_string_variable("sout1", message);
	safe_free(st);
}

// Assembly:
pushq %rbp
pushq %rbx
pushq %rax
movl %esi, %ebp
callq 0x30499
testq %rax, %rax
je 0x30492
movq %rax, %rbx
movslq %ebp, %rax
movb -0x1(%rbx,%rax), %al
leaq 0x6(%rsp), %rsi
movb %al, (%rsi)
movb $0x0, 0x1(%rsi)
leaq 0x68ad2(%rip), %rdi     # 0x98f57
callq 0x30504
movq %rbx, %rdi
callq 0x34ff7
addq $0x8, %rsp
popq %rbx
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: get_string_value
char* get_string_value(char* name)
{
 /*!Last Changed 03.01.2006*/
	/*!Last Changed 06.02.2004 put controls*/
 /*!Last Changed 27.01.2004*/
	char message[READLINELENGTH], *st = NULL;
	variableptr myvar;
 myvar = get_and_check_variable_type(name, 2, "string");
	if (!myvar)
			return NULL;
	if (myvar->value.stringvalue)
		 strcpy(message, myvar->value.stringvalue);
	else
		{
			printf(m1295, name);
			return NULL;
		}
	st = strcopy(st, message);
	return st;
}

// Assembly:
pushq %r14
pushq %rbx
subq $0x7a128, %rsp          # imm = 0x7A128
movq %rdi, %rbx
leaq 0x6a12d(%rip), %rdx     # 0x9a5da
pushq $0x2
popq %rsi
callq 0x30705
testq %rax, %rax
je 0x304dd
movq 0x28(%rax), %rsi
testq %rsi, %rsi
je 0x304e2
movq %rsp, %rbx
movq %rbx, %rdi
callq 0x4270
xorl %edi, %edi
movq %rbx, %rsi
callq 0x3604c
movq %rax, %r14
jmp 0x304f6
xorl %r14d, %r14d
jmp 0x304f6
leaq 0x69031(%rip), %rdi     # 0x9951a
xorl %r14d, %r14d
movq %rbx, %rsi
xorl %eax, %eax
callq 0x4030
movq %r14, %rax
addq $0x7a128, %rsp          # imm = 0x7A128
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: set_default_string_variable
int set_default_string_variable(char* name, char* st)
{
 /*!Last Changed 03.01.2006*/
 /*!Last Changed 05.05.2002*/
 variableptr myvar;
 myvar = get_variable(name);
 if (!myvar)
   return 0;
 if (myvar->value.stringvalue)
   safe_free(myvar->value.stringvalue);
 myvar->value.stringvalue = strcopy(myvar->value.stringvalue, st);
 return 1;
}

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %rbx
callq 0x3092c
testq %rax, %rax
je 0x3052c
movq %rax, %r14
movq 0x28(%rax), %rdi
testq %rdi, %rdi
je 0x30530
callq 0x34ff7
movq 0x28(%r14), %rdi
jmp 0x30532
xorl %eax, %eax
jmp 0x30541
xorl %edi, %edi
movq %rbx, %rsi
callq 0x3604c
movq %rax, 0x28(%r14)
pushq $0x1
popq %rax
addq $0x8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: stringlength
void stringlength(char* name)
{
	/*!Last Changed 27.01.2004*/
	char* st;
	st = get_string_value(name);
	if (!st)
		 return;
	set_default_variable("out1", strlen(st) + 0.0);
	safe_free(st);
}

// Assembly:
pushq %rbx
callq 0x30499
testq %rax, %rax
je 0x30595
movq %rax, %rbx
movq %rax, %rdi
callq 0x4190
movq %rax, %xmm1
punpckldq 0x68904(%rip), %xmm1 # xmm1 = xmm1[0],mem[0],xmm1[1],mem[1]
subpd 0x6890c(%rip), %xmm1    # 0x98e80
movapd %xmm1, %xmm0
unpckhpd %xmm1, %xmm0            # xmm0 = xmm0[1],xmm1[1]
addsd %xmm1, %xmm0
leaq 0x689d1(%rip), %rdi     # 0x98f58
callq 0x30597
movq %rbx, %rdi
popq %rbx
jmp 0x34ff7
popq %rbx
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: countchar
void countchar(char* name, char* ch)
{
 /*!Last Changed 27.01.2004*/
	int count = 0, i, len;
	char* st;
	st = get_string_value(name);
	if (!st)
		 return;
	len = strlen(st);
	for (i = 0; i < len; i++)
		 if (st[i] == ch[0])
				 count++;
	set_default_variable("out1", count + 0.0);
	safe_free(st);
}

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %r14
callq 0x30499
testq %rax, %rax
je 0x30617
movq %rax, %rbx
movq %rax, %rdi
callq 0x4190
xorl %ecx, %ecx
testl %eax, %eax
cmovlel %ecx, %eax
xorl %edx, %edx
cmpq %rcx, %rax
je 0x305f8
movb (%rbx,%rcx), %sil
xorl %edi, %edi
cmpb (%r14), %sil
sete %dil
addl %edi, %edx
incq %rcx
jmp 0x305df
cvtsi2sd %edx, %xmm0
leaq 0x68955(%rip), %rdi     # 0x98f58
callq 0x30597
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
jmp 0x34ff7
addq $0x8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: tokenize
void tokenize(char* name, char* separators)
{
 /*!Last Changed 03.01.2006*/
 /*!Last Changed 27.01.2004*/
 int i, count;
	char message[READLINELENGTH];
 char* tokens[1000];
	char varname[15];
	variableptr myvar;
 myvar = get_and_check_variable_type(name, 2, "string");
	if (!myvar)
			return;
 if (myvar->value.stringvalue)
  	strcpy(message, myvar->value.stringvalue);
	else
		{
			printf(m1295, name);
			return;
		}
 stringlist(message, separators, tokens, &count);
 for (i = 0; i < count; i++)
  {
   sprintf(varname,"aout1[%d]", i + 1);
   set_variable(varname, tokens[i]);
   safe_free(tokens[i]);
  }
	set_default_variable("out1", count + 0.0);
}

// Assembly:
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
subq $0x7c088, %rsp          # imm = 0x7C088
movq %rsi, %rbx
movq %rdi, %r14
leaq 0x69fa0(%rip), %rdx     # 0x9a5da
pushq $0x2
popq %rsi
callq 0x30705
testq %rax, %rax
je 0x306d7
movq 0x28(%rax), %rsi
testq %rsi, %rsi
je 0x306e6
leaq 0x1f60(%rsp), %r14
movq %r14, %rdi
callq 0x4270
leaq 0x20(%rsp), %rdx
leaq 0xc(%rsp), %rcx
movq %r14, %rdi
movq %rbx, %rsi
callq 0x36077
leaq 0x68ebd(%rip), %rbx     # 0x99541
leaq 0x11(%rsp), %r14
xorl %r12d, %r12d
movslq 0xc(%rsp), %rax
cmpq %rax, %r12
jge 0x306c7
leaq 0x1(%r12), %r15
movq %r14, %rdi
movq %rbx, %rsi
movl %r15d, %edx
xorl %eax, %eax
callq 0x41b0
movq 0x20(%rsp,%r12,8), %rsi
movq %r14, %rdi
callq 0x2f4fc
movq 0x20(%rsp,%r12,8), %rdi
callq 0x34ff7
movq %r15, %r12
jmp 0x3068c
cvtsi2sd %eax, %xmm0
leaq 0x68886(%rip), %rdi     # 0x98f58
callq 0x30597
addq $0x7c088, %rsp          # imm = 0x7C088
popq %rbx
popq %r12
popq %r14
popq %r15
retq
leaq 0x68e2d(%rip), %rdi     # 0x9951a
movq %r14, %rsi
xorl %eax, %eax
addq $0x7c088, %rsp          # imm = 0x7C088
popq %rbx
popq %r12
popq %r14
popq %r15
jmp 0x4030
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: get_and_check_variable_type
variableptr get_and_check_variable_type(char* name, VARIABLE_TYPE validtype, char* message)
{
 /*!Last Changed 03.01.2006*/
 variableptr myvar;
 myvar = get_variable(name);
 if (!myvar)
   printf(m1302, name);
 else
   if (myvar->type != validtype)
    {
     printf(m1303, message);
     return NULL;
    }
 return myvar;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movq %rdx, %r14
movl %esi, %ebp
movq %rdi, %r15
callq 0x3092c
testq %rax, %rax
je 0x30733
movq %rax, %rbx
cmpl %ebp, (%rax)
je 0x30746
leaq 0x68ef6(%rip), %rdi     # 0x99622
xorl %ebx, %ebx
movq %r14, %rsi
jmp 0x3073f
leaq 0x68ecc(%rip), %rdi     # 0x99606
xorl %ebx, %ebx
movq %r15, %rsi
xorl %eax, %eax
callq 0x4030
movq %rbx, %rax
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: read_userfile
void read_userfile(char* name, char* varname)
{
 /*!Last Changed 03.01.2006*/
	/*!Last Changed 29.10.2005*/
 /*!Last Changed 21.10.2004*/
 /*!Last Changed 27.01.2004*/
	char message[READLINELENGTH];
	variableptr myvar;
 myvar = get_and_check_variable_type(name, 4, "file");
	if (!myvar)
			return;
	if (myvar->userfile)
		 fscanf(myvar->userfile, "%s", message);
	set_variable(varname, message);
}

// Assembly:
pushq %rbx
subq $0x7a120, %rsp          # imm = 0x7A120
movq %rsi, %rbx
leaq 0x6558b(%rip), %rdx     # 0x95cf1
pushq $0x4
popq %rsi
callq 0x30705
testq %rax, %rax
je 0x30798
movq 0x10(%rax), %rdi
testq %rdi, %rdi
je 0x3078d
leaq 0x6774d(%rip), %rsi     # 0x97ed0
movq %rsp, %rdx
xorl %eax, %eax
callq 0x4070
movq %rsp, %rsi
movq %rbx, %rdi
callq 0x2f4fc
addq $0x7a120, %rsp          # imm = 0x7A120
popq %rbx
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: get_variable
variableptr get_variable(char* st)
{
	/*!Last Changed 02.01.2006*/
	int ind;
	char* st2;
 variableptr myvar;
 ind = return_variable_index(st, vars, varcount);
 if (ind != -1)
		{
   st2 = array_variable(st);
   if (st2)
				{
     myvar = array_pos(st, &(vars[ind]));
     safe_free(st2);
					return myvar;
			 }
   else
				 return &(vars[ind]);
	 }
	return NULL;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movq %rdi, %rbx
leaq 0x9cf2b(%rip), %r15     # 0xcd868
movq (%r15), %rsi
leaq 0x9cbbd(%rip), %rax     # 0xcd504
movl (%rax), %edx
callq 0x2f622
cmpl $-0x1, %eax
je 0x3098a
movl %eax, %ebp
movq %rbx, %rdi
callq 0x30b99
movq %rax, %r14
movslq %ebp, %rax
imulq $0x30, %rax, %rax
addq (%r15), %rax
testq %r14, %r14
je 0x3098c
movq %rbx, %rdi
movq %rax, %rsi
callq 0x31036
movq %rax, %rbx
movq %r14, %rdi
callq 0x34ff7
movq %rbx, %rax
jmp 0x3098c
xorl %eax, %eax
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: write_userfile
void write_userfile(char* name, char* line)
{
 /*!Last Changed 03.01.2006*/
 /*!Last Changed 05.11.2003*/
	variableptr myvar;
 myvar = get_and_check_variable_type(name, 4, "file");
	if (!myvar)
			return;
	if (myvar->userfile)
			fprintf(myvar->userfile, "%s\n", line);
}

// Assembly:
pushq %rbx
movq %rsi, %rbx
leaq 0x6534f(%rip), %rdx     # 0x95cf1
pushq $0x4
popq %rsi
callq 0x30705
testq %rax, %rax
je 0x309ca
movq 0x10(%rax), %rdi
testq %rdi, %rdi
je 0x309ca
leaq 0x6fc03(%rip), %rsi     # 0xa05c2
movq %rbx, %rdx
xorl %eax, %eax
popq %rbx
jmp 0x42e0
popq %rbx
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: open_userfile
void open_userfile(char* name, char* filetype)
{
 /*!Last Changed 03.01.2006*/
	/*!Last Changed 27.01.2004*/
 /*!Last Changed 10.11.2003*/
 variableptr myvar;
 myvar = get_and_check_variable_type(name, 4, "file");
	if (!myvar)
			return;
	if (!(myvar->userfile))
		{
			myvar->userfile = fopen(myvar->value.stringvalue, filetype);
			if (!(myvar->userfile))
					printf(m1296, myvar->value.stringvalue, filetype);
		}
}

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %rbx
leaq 0x65317(%rip), %rdx     # 0x95cf1
pushq $0x4
popq %rsi
callq 0x30705
testq %rax, %rax
je 0x30a06
movq %rax, %r14
cmpq $0x0, 0x10(%rax)
jne 0x30a06
movq 0x28(%r14), %rdi
movq %rbx, %rsi
callq 0x40f0
movq %rax, 0x10(%r14)
testq %rax, %rax
je 0x30a0e
addq $0x8, %rsp
popq %rbx
popq %r14
retq
movq 0x28(%r14), %rsi
leaq 0x68b32(%rip), %rdi     # 0x9954b
movq %rbx, %rdx
xorl %eax, %eax
addq $0x8, %rsp
popq %rbx
popq %r14
jmp 0x4030
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: close_userfile
void close_userfile(char* name)
{
 /*!Last Changed 03.01.2006*/
 /*!Last Changed 05.11.2003*/
 variableptr myvar;
 myvar = get_and_check_variable_type(name, 4, "file");
	if (!myvar)
			return;
	if (myvar->userfile)
		{
			fclose(myvar->userfile);
			myvar->userfile = NULL;
		}
}

// Assembly:
pushq %rbx
leaq 0x652bf(%rip), %rdx     # 0x95cf1
pushq $0x4
popq %rsi
callq 0x30705
testq %rax, %rax
je 0x30a55
movq %rax, %rbx
movq 0x10(%rax), %rdi
testq %rdi, %rdi
je 0x30a55
callq 0x42a0
andq $0x0, 0x10(%rbx)
popq %rbx
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: array_variable
char* array_variable(char* name)
{
	/*!Last Changed 02.02.2004 added safemalloc*/
 /*!Last Changed 02.05.2002*/
 char* st = NULL;
 int i, len;
	len = strlen(name);
 for (i = 0; i < len; i++)
   if (name[i] == '[')
    {
     st = safemalloc(sizeof(char) * (i + 1), "array_variable", 7);
     strncpy(st, name, i);
     st[i] = '\0';
     break;
    }
 return st;
}

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
movq %rdi, %rbx
callq 0x4190
xorl %r14d, %r14d
testl %eax, %eax
cmovlel %r14d, %eax
xorl %ecx, %ecx
cmpq %rcx, %rax
je 0x30bed
leaq 0x1(%rcx), %r15
cmpb $0x5b, (%rbx,%rcx)
movq %r15, %rcx
jne 0x30bb1
leaq 0x689dd(%rip), %rsi     # 0x995a7
pushq $0x7
popq %rdx
movq %r15, %rdi
callq 0x34f59
movq %rax, %r14
leaq -0x1(%r15), %rdx
movq %rax, %rdi
movq %rbx, %rsi
callq 0x42b0
movb $0x0, -0x1(%r14,%r15)
movq %r14, %rax
popq %rbx
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: check_var
BOOLEAN check_var(struct variable var, char* value)
{
	/*!Last Changed 05.11.2003 Added file variable with type 4*/
 /*!Last Changed 02.05.2002*/
 int tmp;
 double tmpd;
 switch (var.type)
  {
   case INTEGER_TYPE:tmp = atoi(value);
                     if (var.value.intvalue == tmp)
                       return BOOLEAN_TRUE;
                     else
                       return BOOLEAN_FALSE;
   case REAL_TYPE   :tmpd = atof(value);
                     if (var.value.floatvalue == tmpd)
                       return BOOLEAN_TRUE;
                     else
                       return BOOLEAN_FALSE;
   case STRING_TYPE :
			case FILE_TYPE   :if (strcmp(var.value.stringvalue, value) == 0)
                       return BOOLEAN_TRUE;
                     else
                       return BOOLEAN_FALSE;
   default          :break;
  }
 return BOOLEAN_FALSE;
}

// Assembly:
pushq %rbx
movl 0x10(%rsp), %ecx
xorl %eax, %eax
cmpq $0x4, %rcx
ja 0x30c4e
movq %rdi, %rsi
leaq 0x10(%rsp), %rbx
leaq 0x6814a(%rip), %rdx     # 0x98d5c
movslq (%rdx,%rcx,4), %rcx
addq %rdx, %rcx
jmpq *%rcx
movq 0x28(%rbx), %rdi
callq 0x4260
testl %eax, %eax
jmp 0x30c4b
movq %rsi, %rdi
callq 0x4130
cmpeqsd 0x28(%rbx), %xmm0
movq %xmm0, %rax
andl $0x1, %eax
jmp 0x30c4e
movq %rsi, %rdi
callq 0x4200
cmpl %eax, 0x28(%rbx)
sete %al
movzbl %al, %eax
popq %rbx
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: get_value
double get_value(struct variable var)
{
/*!Last Changed 02.05.2002*/
 switch (var.type)
  {
   case INTEGER_TYPE:return var.value.intvalue;
   case REAL_TYPE   :return var.value.floatvalue;
   default          :return 0;
  }
 return 0;
}

// Assembly:
leaq 0x8(%rsp), %rax
movl (%rax), %ecx
cmpl $0x1, %ecx
je 0x30ca8
xorps %xmm0, %xmm0
testl %ecx, %ecx
jne 0x30cad
cvtsi2sdl 0x28(%rax), %xmm0
retq
movsd 0x28(%rax), %xmm0
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: array_sizes
int* array_sizes(char* name, int* dimcount)
{
 /*!Last Changed 06.01.2006*/
 int i, start, end = 0, len, *dimensions = NULL;
 char st[READLINELENGTH], *p;
 len = strlen(name);
 for (i = 0; i < len; i++)
   if (name[i] == '[')
     start = i + 1;
   else
     if (name[i] == ']')
      {
       end = i - 1;
       break;
      }
 for (i = start; i <= end; i++)
   st[i - start] = name[i];
 st[i - start] = '\0';
 p = strtok(st, ",");
 *dimcount = 0;
 while (p)
  {
   (*dimcount)++;
   dimensions = alloc(dimensions, (*dimcount) * sizeof(int), *dimcount);
   dimensions[(*dimcount) - 1] = atoi(p);
   p = strtok(NULL, ",");
  }
 return dimensions;
}

// Assembly:
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
subq $0x7a128, %rsp          # imm = 0x7A128
movq %rsi, %rbx
movq %rdi, %r14
callq 0x4190
xorl %ecx, %ecx
testl %eax, %eax
cmovlel %ecx, %eax
negq %rax
movabsq $-0x100000000, %rsi     # imm = 0xFFFFFFFF00000000
movabsq $0x100000000, %rdi      # imm = 0x100000000
xorl %r8d, %r8d
movq %r8, %r9
shlq $0x20, %r9
addq %rsi, %r9
incq %r8
leaq (%rax,%r8), %r10
cmpq $0x1, %r10
je 0x30fa4
movzbl -0x1(%r14,%r8), %r10d
cmpl $0x5b, %r10d
je 0x30f98
cmpl $0x5d, %r10d
je 0x30f9d
addq %rdi, %r9
jmp 0x30f74
movl %r8d, %edx
jmp 0x30f6a
sarq $0x20, %r9
movq %r9, %rcx
movslq %edx, %rax
addq %rax, %r14
xorl %edx, %edx
leaq (%rax,%rdx), %rsi
cmpq %rcx, %rsi
jg 0x30fc2
movb (%r14,%rdx), %sil
movb %sil, (%rsp,%rdx)
incq %rdx
jmp 0x30fac
movslq %edx, %rax
movb $0x0, (%rsp,%rax)
leaq 0x67a96(%rip), %r14     # 0x98a66
movq %rsp, %rdi
movq %r14, %rsi
callq 0x4280
movq %rax, %r12
andl $0x0, (%rbx)
xorl %r15d, %r15d
testq %r12, %r12
je 0x31024
movslq (%rbx), %rax
leaq 0x1(%rax), %rdx
movl %edx, (%rbx)
leaq 0x4(,%rax,4), %rsi
movq %r15, %rdi
callq 0x34f30
movq %rax, %r15
movq %r12, %rdi
callq 0x4200
movslq (%rbx), %rcx
movl %eax, -0x4(%r15,%rcx,4)
xorl %edi, %edi
movq %r14, %rsi
callq 0x4280
movq %rax, %r12
jmp 0x30fe4
movq %r15, %rax
addq $0x7a128, %rsp          # imm = 0x7A128
popq %rbx
popq %r12
popq %r14
popq %r15
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: array_pos
variableptr array_pos(char *name, variableptr myvar)
{
 /*!Last Changed 06.01.2006*/
	/*!Last Changed 02.02.2004 added safemalloc*/
 /*!Last Changed 02.05.2002*/
 int i, start, end = 0, len;
 char st[READLINELENGTH], *p;
 variableptr myvar2, result = myvar;
 Expnodeptr list;
 len = strlen(name);
 for (i = 0; i < len; i++)
   if (name[i] == '[')
     start = i + 1;
   else
     if (name[i] == ']')
      {
       end = i - 1;
       break;
      }
 for (i = start; i <= end; i++)
   st[i - start] = name[i];
 st[i - start] = '\0';
 p = strtok(st, ",");
 while (p)
  {
   list = create_expression_list(p);
   myvar2 = evaluate_expression_list(list);
   result = &(result->value.array[myvar2->value.intvalue - 1]);
   safe_free(myvar2);
   p = strtok(NULL, ",");
  }
 return result;
}

// Assembly:
pushq %r14
pushq %rbx
subq $0x7a128, %rsp          # imm = 0x7A128
movq %rsi, %rbx
movq %rdi, %r14
callq 0x4190
xorl %ecx, %ecx
testl %eax, %eax
cmovlel %ecx, %eax
negq %rax
movabsq $-0x100000000, %rsi     # imm = 0xFFFFFFFF00000000
movabsq $0x100000000, %rdi      # imm = 0x100000000
xorl %r8d, %r8d
movq %r8, %r9
shlq $0x20, %r9
addq %rsi, %r9
incq %r8
leaq (%rax,%r8), %r10
cmpq $0x1, %r10
je 0x310a6
movzbl -0x1(%r14,%r8), %r10d
cmpl $0x5b, %r10d
je 0x3109a
cmpl $0x5d, %r10d
je 0x3109f
addq %rdi, %r9
jmp 0x31076
movl %r8d, %edx
jmp 0x3106c
sarq $0x20, %r9
movq %r9, %rcx
movslq %edx, %rax
addq %rax, %r14
xorl %edx, %edx
leaq (%rax,%rdx), %rsi
cmpq %rcx, %rsi
jg 0x310c4
movb (%r14,%rdx), %sil
movb %sil, (%rsp,%rdx)
incq %rdx
jmp 0x310ae
movslq %edx, %rax
movb $0x0, (%rsp,%rax)
leaq 0x67994(%rip), %r14     # 0x98a66
movq %rsp, %rdi
movq %r14, %rsi
callq 0x4280
testq %rax, %rax
je 0x31112
movq %rax, %rdi
callq 0x31120
movq %rax, %rdi
callq 0x31243
movq 0x28(%rbx), %rcx
movslq 0x28(%rax), %rdx
imulq $0x30, %rdx, %rdx
leaq (%rcx,%rdx), %rbx
addq $-0x30, %rbx
movq %rax, %rdi
callq 0x34ff7
xorl %edi, %edi
jmp 0x310d5
movq %rbx, %rax
addq $0x7a128, %rsp          # imm = 0x7A128
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: create_expression_list
Expnodeptr create_expression_list(char* st)
{
 /*!Last Changed 03.01.2006*/
 char st1[READLINELENGTH];
 int i = 0, j = 0, indexs, indexo;
 Expnodeptr start = NULL, tmpbefore = NULL;
 while (st[i])
  {
   indexs = listindexc(st[i], separators, 5);
   indexo = listindexc(st[i], operators, 7);
   if (indexs != -1 || indexo != -1)
    {
     st1[j] = '\0';
     add_expnode(st1, &tmpbefore, &start);
     st1[0] = st[i];
     st1[1] = '\0';
     add_expnode(st1, &tmpbefore, &start);
     j = -1;
    }
   else
     st1[j] = st[i];
   i++;
   j++;
  }
 st1[j] = '\0';
 add_expnode(st1, &tmpbefore, &start); 
 st1[0] = st[i];
 st1[1] = '\0';
 add_expnode(st1, &tmpbefore, &start);
 return start;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x7a138, %rsp          # imm = 0x7A138
leaq 0x8(%rsp), %rax
andq $0x0, (%rax)
movq %rsp, %rax
andq $0x0, (%rax)
movq %rdi, %rbx
xorl %r12d, %r12d
leaq 0x9bc7a(%rip), %r13     # 0xccdc8
pushq $0x5
popq %r14
leaq 0x9bc74(%rip), %r15     # 0xccdcd
movb (%rbx), %al
movslq %r12d, %rbp
testb %al, %al
je 0x311f3
movsbl %al, %edi
movq %r13, %rsi
movl %r14d, %edx
callq 0x35ff2
movl %eax, %r12d
movsbl (%rbx), %edi
movq %r15, %rsi
pushq $0x7
popq %rdx
callq 0x35ff2
cmpl $-0x1, %r12d
jne 0x3119d
cmpl $-0x1, %eax
jne 0x3119d
movb (%rbx), %al
movb %al, 0x10(%rsp,%rbp)
incl %ebp
movl %ebp, %r12d
jmp 0x311eb
xorl %r12d, %r12d
movb %r12b, 0x10(%rsp,%rbp)
leaq 0x10(%rsp), %rdi
movl %r14d, %r15d
movq %r13, %r14
movq %rsp, %r13
movq %r13, %rsi
leaq 0x8(%rsp), %rbp
movq %rbp, %rdx
callq 0x3183e
movb (%rbx), %al
movb %al, 0x10(%rsp)
movb %r12b, 0x11(%rsp)
leaq 0x10(%rsp), %rdi
movq %r13, %rsi
movq %r14, %r13
movl %r15d, %r14d
leaq 0x9bbea(%rip), %r15     # 0xccdcd
movq %rbp, %rdx
callq 0x3183e
incq %rbx
jmp 0x31159
xorl %r13d, %r13d
movb %r13b, 0x10(%rsp,%rbp)
leaq 0x10(%rsp), %r14
movq %rsp, %r15
leaq 0x8(%rsp), %r12
movq %r14, %rdi
movq %r15, %rsi
movq %r12, %rdx
callq 0x3183e
movb (%rbx), %al
movb %al, (%r14)
movb %r13b, 0x1(%r14)
movq %r14, %rdi
movq %r15, %rsi
movq %r12, %rdx
callq 0x3183e
movq (%r12), %rax
addq $0x7a138, %rsp          # imm = 0x7A138
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: set_multidimensional_array
void set_multidimensional_array(variableptr myvar, void* value)
{
 /*!Last Changed 22.12.2006 added matrix type*/
 /*!Last Changed 05.01.2006*/
 int j;
 for (j = 0; j < myvar->arraysize; j++)
   switch (myvar->value.array[j].type)
    {
     case INTEGER_TYPE:myvar->value.array[j].value.intvalue = atoi((char *)value);
                       break;
     case REAL_TYPE   :myvar->value.array[j].value.floatvalue = atof((char *)value);
                       break;
     case ARRAY_TYPE  :set_multidimensional_array(&(myvar->value.array[j]), value);
                       break;
     case STRING_TYPE :
     case FILE_TYPE   :if (myvar->value.array[j].value.stringvalue)
                         safe_free(myvar->value.array[j].value.stringvalue);
                       myvar->value.array[j].value.stringvalue = strcopy(myvar->value.array[j].value.stringvalue, (char *)value);
                       break;
     case MATRIX_TYPE :myvar->value.array[j].value.matrixvalue = (matrixptr) value;
                       break;
     default          :break;
    }
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movq %rsi, %rbx
movq %rdi, %r14
xorl %r12d, %r12d
leaq 0x6795c(%rip), %r13     # 0x98dd0
xorl %ebp, %ebp
movslq 0x20(%r14), %rax
cmpq %rax, %rbp
jge 0x3150b
movq 0x28(%r14), %r15
movl (%r15,%r12), %eax
cmpq $0x5, %rax
ja 0x314ff
movslq (%r13,%rax,4), %rax
addq %r13, %rax
jmpq *%rax
movq 0x28(%r15,%r12), %rdi
testq %rdi, %rdi
je 0x314ec
callq 0x34ff7
movq 0x28(%r14), %rax
movq 0x28(%rax,%r12), %rdi
jmp 0x314ee
movq %rbx, %rdi
callq 0x4200
movl %eax, 0x28(%r15,%r12)
jmp 0x314ff
movq %rbx, %rdi
callq 0x4130
movsd %xmm0, 0x28(%r15,%r12)
jmp 0x314ff
movq %rbx, 0x28(%r15,%r12)
jmp 0x314ff
addq %r12, %r15
movq %r15, %rdi
movq %rbx, %rsi
callq 0x31459
jmp 0x314ff
xorl %edi, %edi
movq %rbx, %rsi
callq 0x3604c
movq 0x28(%r14), %rcx
movq %rax, 0x28(%rcx,%r12)
incq %rbp
addq $0x30, %r12
jmp 0x31476
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: free_multidimensional_array
void free_multidimensional_array(variableptr myvar)
{
 /*!Last Changed 22.12.2006 added array of matrices*/
 /*!Last Changed 04.01.2006*/
 int j;
 for (j = 0; j < myvar->arraysize; j++)
   if (myvar->value.array[j].type == ARRAY_TYPE)
     free_multidimensional_array(&(myvar->value.array[j]));
   else
    {
     if (in_list(myvar->value.array[j].type, 2, STRING_TYPE, FILE_TYPE))
      {
       if (myvar->value.array[j].value.stringvalue)
         safe_free(myvar->value.array[j].value.stringvalue);
      }
     else
       if (myvar->value.array[j].type == MATRIX_TYPE && myvar->value.array[j].value.matrixvalue)
        {
         matrix_free(*(myvar->value.array[j].value.matrixvalue));
         safe_free(myvar->value.array[j].value.matrixvalue);
        }
    }
 safe_free(myvar->value.array);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
movq %rdi, %rbx
pushq $0x2
popq %rbp
pushq $0x4
popq %r14
xorl %r15d, %r15d
xorl %r12d, %r12d
movslq 0x20(%rbx), %rax
movq 0x28(%rbx), %rdi
cmpq %rax, %r12
jge 0x315aa
movl (%rdi,%r15), %eax
cmpl $0x3, %eax
jne 0x31552
addq %r15, %rdi
callq 0x3151a
jmp 0x315a1
movl %eax, %edi
movl %ebp, %esi
movl %ebp, %edx
movl %r14d, %ecx
xorl %eax, %eax
callq 0x35812
movq 0x28(%rbx), %rcx
testl %eax, %eax
je 0x31576
movq 0x28(%rcx,%r15), %rdi
testq %rdi, %rdi
jne 0x3159c
jmp 0x315a1
cmpl $0x5, (%rcx,%r15)
jne 0x315a1
movq 0x28(%rcx,%r15), %rax
testq %rax, %rax
je 0x315a1
movq (%rax), %rdi
movq 0x8(%rax), %rsi
callq 0x3929f
movq 0x28(%rbx), %rax
movq 0x28(%rax,%r15), %rdi
callq 0x34ff7
incq %r12
addq $0x30, %r15
jmp 0x31532
popq %rbx
popq %r12
popq %r14
popq %r15
popq %rbp
jmp 0x34ff7
// File: /workspace/github_c_makefile_star2_O2/olcaytaner[P]Isell/lang.c
// Function: create_multidimensional_array
void create_multidimensional_array(variableptr myvar, int* dimensions, int curdimension, int dimcount, int type)
{
 /*!Last Changed 04.01.2006*/
 int k, size;
 size = dimensions[curdimension];
 myvar->arraysize = size;
 myvar->value.array = (variableptr)safemalloc(size * sizeof(struct variable), "create_multidimensional_array", 4);
 for (k = 0; k < size; k++)
   if (curdimension + 1 < dimcount)
    {
     myvar->value.array[k].type = ARRAY_TYPE;
     myvar->value.array[k].name = NULL;
     create_multidimensional_array(&(myvar->value.array[k]), dimensions, curdimension + 1, dimcount, type);
    }
   else
    {
     myvar->value.array[k].name = NULL;
     myvar->value.array[k].type = type;
     myvar->value.array[k].arraysize = 0;
     set_default_value(&(myvar->value.array[k]));
    }
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movl %r8d, %ebx
movl %ecx, %ebp
movq %rdi, %r15
movslq %edx, %r12
movq %rsi, (%rsp)
movslq (%rsi,%r12,4), %r14
movl %r14d, 0x20(%rdi)
imulq $0x30, %r14, %rdi
leaq 0x67fe1(%rip), %rsi     # 0x995c5
pushq $0x4
popq %rdx
callq 0x34f59
movq %rax, 0x28(%r15)
incl %r12d
xorl %r13d, %r13d
testl %r14d, %r14d
movl $0x0, %eax
cmovgl %r14d, %eax
imulq $0x30, %rax, %r14
cmpq %r13, %r14
je 0x3166a
movq 0x28(%r15), %rax
cmpl %ebp, %r12d
jge 0x31640
movl $0x3, (%rax,%r13)
movq 0x28(%r15), %rax
andq $0x0, 0x18(%rax,%r13)
movq 0x28(%r15), %rdi
addq %r13, %rdi
movq (%rsp), %rsi
movl %r12d, %edx
movl %ebp, %ecx
movl %ebx, %r8d
callq 0x315b7
jmp 0x31664
andq $0x0, 0x18(%rax,%r13)
movq 0x28(%r15), %rax
movl %ebx, (%rax,%r13)
movq 0x28(%r15), %rax
andl $0x0, 0x20(%rax,%r13)
movq 0x28(%r15), %rdi
addq %r13, %rdi
callq 0x31431
addq $0x30, %r13
jmp 0x31606
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq