// File: ArashPartow[P]exprtk/./exprtk.hpp
// Function: exprtk::parser<double>::parse_base_operation()
inline expression_node_ptr parse_base_operation()
      {
         typedef std::pair<base_ops_map_t::iterator,base_ops_map_t::iterator> map_range_t;

         const std::string operation_name   = current_token().value;
         const token_t     diagnostic_token = current_token();

         map_range_t itr_range = base_ops_map_.equal_range(operation_name);

         if (0 == std::distance(itr_range.first,itr_range.second))
         {
            set_error(make_error(
               parser_error::e_syntax,
               diagnostic_token,
               "ERR033 - No entry found for base operation: " + operation_name,
               exprtk_error_location));

            return error_node();
         }

         static const std::size_t MaxNumberofParameters = 4;
         expression_node_ptr param_list[MaxNumberofParameters] = {0};

         const std::size_t parameter_count = parse_base_function_call(param_list, operation_name);

         if ((parameter_count > 0) && (parameter_count <= MaxNumberofParameters))
         {
            for (base_ops_map_t::iterator itr = itr_range.first; itr != itr_range.second; ++itr)
            {
               const details::base_operation_t& operation = itr->second;

               if (operation.num_params == parameter_count)
               {
                  switch (parameter_count)
                  {
                     #define base_opr_case(N)                                         \
                     case N : {                                                       \
                                 expression_node_ptr pl##N[N] = {0};                  \
                                 std::copy(param_list, param_list + N, pl##N);        \
                                 lodge_symbol(operation_name, e_st_function);         \
                                 return expression_generator_(operation.type, pl##N); \
                              }                                                       \

                     base_opr_case(1)
                     base_opr_case(2)
                     base_opr_case(3)
                     base_opr_case(4)
                     #undef base_opr_case
                  }
               }
            }
         }

         for (std::size_t i = 0; i < MaxNumberofParameters; ++i)
         {
            free_node(node_allocator_, param_list[i]);
         }

         set_error(make_error(
            parser_error::e_syntax,
            diagnostic_token,
            "ERR034 - Invalid number of input parameters for call to function: '" + operation_name + "'",
            exprtk_error_location));

         return error_node();
      }

// Assembly:
subq $0x3c8, %rsp            # imm = 0x3C8
movq %rdi, 0x3b8(%rsp)
movq 0x3b8(%rsp), %rdi
movq %rdi, 0x50(%rsp)
callq 0x373e90
movq %rax, %rsi
addq $0x8, %rsi
leaq 0x398(%rsp), %rdi
callq 0x11b140
movq 0x50(%rsp), %rdi
callq 0x373e90
movq %rax, 0x58(%rsp)
jmp 0x385f76
movq 0x58(%rsp), %rsi
leaq 0x368(%rsp), %rdi
callq 0x255940
jmp 0x385f8a
movq 0x50(%rsp), %rdi
addq $0x3f0, %rdi            # imm = 0x3F0
leaq 0x398(%rsp), %rsi
callq 0x3acd00
movq %rdx, 0x40(%rsp)
movq %rax, 0x48(%rsp)
jmp 0x385faf
movq 0x40(%rsp), %rax
movq 0x48(%rsp), %rcx
movq %rcx, 0x348(%rsp)
movq %rax, 0x350(%rsp)
movq 0x348(%rsp), %rax
movq %rax, 0x340(%rsp)
movq 0x350(%rsp), %rax
movq %rax, 0x338(%rsp)
movq 0x340(%rsp), %rdi
movq 0x338(%rsp), %rsi
callq 0x3acd40
movq %rax, 0x38(%rsp)
jmp 0x386005
movq 0x38(%rsp), %rcx
xorl %eax, %eax
cmpq %rcx, %rax
jne 0x3861b7
leaq 0x221835(%rip), %rsi    # 0x5a7851
leaq 0x270(%rsp), %rdi
leaq 0x398(%rsp), %rdx
callq 0x3784f0
jmp 0x386033
leaq 0x230(%rsp), %rdi
movl $0x65c5, %esi           # imm = 0x65C5
callq 0x371f20
jmp 0x386047
leaq 0x220ec5(%rip), %rsi    # 0x5a6f13
leaq 0x250(%rsp), %rdi
leaq 0x230(%rsp), %rdx
callq 0x29dd70
jmp 0x386065
leaq 0x290(%rsp), %rdi
movl $0x1, %esi
leaq 0x368(%rsp), %rdx
leaq 0x270(%rsp), %rcx
leaq 0x250(%rsp), %r8
callq 0x3741e0
jmp 0x386091
movq 0x50(%rsp), %rdi
leaq 0x290(%rsp), %rsi
callq 0x371e40
jmp 0x3860a5
leaq 0x290(%rsp), %rdi
callq 0x371330
leaq 0x250(%rsp), %rdi
callq 0x11b838
leaq 0x230(%rsp), %rdi
callq 0x11b838
leaq 0x270(%rsp), %rdi
callq 0x11b838
callq 0x2821f0
movq %rax, 0x3c0(%rsp)
movl $0x1, 0x22c(%rsp)
jmp 0x3866fa
movq %rax, %rcx
movl %edx, %eax
movq %rcx, 0x360(%rsp)
movl %eax, 0x35c(%rsp)
jmp 0x386731
movq %rax, %rcx
movl %edx, %eax
movq %rcx, 0x360(%rsp)
movl %eax, 0x35c(%rsp)
jmp 0x386724
movq %rax, %rcx
movl %edx, %eax
movq %rcx, 0x360(%rsp)
movl %eax, 0x35c(%rsp)
jmp 0x3861a5
movq %rax, %rcx
movl %edx, %eax
movq %rcx, 0x360(%rsp)
movl %eax, 0x35c(%rsp)
jmp 0x386198
movq %rax, %rcx
movl %edx, %eax
movq %rcx, 0x360(%rsp)
movl %eax, 0x35c(%rsp)
jmp 0x38618b
movq %rax, %rcx
movl %edx, %eax
movq %rcx, 0x360(%rsp)
movl %eax, 0x35c(%rsp)
leaq 0x290(%rsp), %rdi
callq 0x371330
leaq 0x250(%rsp), %rdi
callq 0x11b838
leaq 0x230(%rsp), %rdi
callq 0x11b838
leaq 0x270(%rsp), %rdi
callq 0x11b838
jmp 0x386724
movq 0x50(%rsp), %rdi
xorps %xmm0, %xmm0
movaps %xmm0, 0x210(%rsp)
movaps %xmm0, 0x200(%rsp)
leaq 0x200(%rsp), %rsi
leaq 0x398(%rsp), %rdx
callq 0x3acd80
movq %rax, 0x30(%rsp)
jmp 0x3861eb
movq 0x30(%rsp), %rax
movq %rax, 0x1f8(%rsp)
cmpq $0x0, 0x1f8(%rsp)
jbe 0x3864f6
cmpq $0x4, 0x1f8(%rsp)
ja 0x3864f6
movq 0x348(%rsp), %rax
movq %rax, 0x1f0(%rsp)
leaq 0x348(%rsp), %rsi
addq $0x8, %rsi
leaq 0x1f0(%rsp), %rdi
callq 0x3ad7e0
testb $0x1, %al
jne 0x386248
jmp 0x3864f4
leaq 0x1f0(%rsp), %rdi
callq 0x3ad800
addq $0x20, %rax
movq %rax, 0x1e8(%rsp)
movq 0x1e8(%rsp), %rax
movl 0x4(%rax), %eax
cmpq 0x1f8(%rsp), %rax
jne 0x3864e0
movq 0x1f8(%rsp), %rax
decq %rax
movq %rax, 0x28(%rsp)
subq $0x3, %rax
ja 0x3864de
movq 0x28(%rsp), %rax
leaq 0x215b48(%rip), %rcx    # 0x59bde8
movslq (%rcx,%rax,4), %rax
addq %rcx, %rax
jmpq *%rax
movq $0x0, 0x1e0(%rsp)
leaq 0x208(%rsp), %rsi
leaq 0x200(%rsp), %rdi
leaq 0x1e0(%rsp), %rdx
callq 0x3ad820
jmp 0x3862d4
movq 0x50(%rsp), %rdi
leaq 0x398(%rsp), %rsi
movl $0x5, %edx
callq 0x39aef0
jmp 0x3862ed
movq 0x50(%rsp), %rdi
addq $0x220, %rdi            # imm = 0x220
movq 0x1e8(%rsp), %rsi
leaq 0x1e0(%rsp), %rdx
callq 0x3ad870
movq %rax, 0x20(%rsp)
jmp 0x386315
movq 0x20(%rsp), %rax
movq %rax, 0x3c0(%rsp)
movl $0x1, 0x22c(%rsp)
jmp 0x3866fa
xorps %xmm0, %xmm0
movaps %xmm0, 0x1d0(%rsp)
leaq 0x210(%rsp), %rsi
leaq 0x200(%rsp), %rdi
leaq 0x1d0(%rsp), %rdx
callq 0x3ad820
jmp 0x38635c
movq 0x50(%rsp), %rdi
leaq 0x398(%rsp), %rsi
movl $0x5, %edx
callq 0x39aef0
jmp 0x386375
movq 0x50(%rsp), %rdi
addq $0x220, %rdi            # imm = 0x220
movq 0x1e8(%rsp), %rsi
leaq 0x1d0(%rsp), %rdx
callq 0x3ad9f0
movq %rax, 0x18(%rsp)
jmp 0x38639d
movq 0x18(%rsp), %rax
movq %rax, 0x3c0(%rsp)
movl $0x1, 0x22c(%rsp)
jmp 0x3866fa
xorps %xmm0, %xmm0
movaps %xmm0, 0x1b0(%rsp)
movq $0x0, 0x1c0(%rsp)
leaq 0x218(%rsp), %rsi
leaq 0x200(%rsp), %rdi
leaq 0x1b0(%rsp), %rdx
callq 0x3ad820
jmp 0x3863f0
movq 0x50(%rsp), %rdi
leaq 0x398(%rsp), %rsi
movl $0x5, %edx
callq 0x39aef0
jmp 0x386409
movq 0x50(%rsp), %rdi
addq $0x220, %rdi            # imm = 0x220
movq 0x1e8(%rsp), %rsi
leaq 0x1b0(%rsp), %rdx
callq 0x3ae960
movq %rax, 0x10(%rsp)
jmp 0x386431
movq 0x10(%rsp), %rax
movq %rax, 0x3c0(%rsp)
movl $0x1, 0x22c(%rsp)
jmp 0x3866fa
xorps %xmm0, %xmm0
movaps %xmm0, 0x1a0(%rsp)
movaps %xmm0, 0x190(%rsp)
leaq 0x220(%rsp), %rsi
leaq 0x200(%rsp), %rdi
leaq 0x190(%rsp), %rdx
callq 0x3ad820
jmp 0x386480
movq 0x50(%rsp), %rdi
leaq 0x398(%rsp), %rsi
movl $0x5, %edx
callq 0x39aef0
jmp 0x386499
movq 0x50(%rsp), %rdi
addq $0x220, %rdi            # imm = 0x220
movq 0x1e8(%rsp), %rsi
leaq 0x190(%rsp), %rdx
callq 0x3aef10
movq %rax, 0x8(%rsp)
jmp 0x3864c1
movq 0x8(%rsp), %rax
movq %rax, 0x3c0(%rsp)
movl $0x1, 0x22c(%rsp)
jmp 0x3866fa
jmp 0x3864e0
jmp 0x3864e2
leaq 0x1f0(%rsp), %rdi
callq 0x3aef40
jmp 0x386226
jmp 0x3864f6
movq $0x0, 0x188(%rsp)
cmpq $0x4, 0x188(%rsp)
jae 0x386548
movq 0x50(%rsp), %rdi
addq $0x290, %rdi            # imm = 0x290
movq 0x188(%rsp), %rax
leaq 0x200(%rsp,%rax,8), %rsi
callq 0x284bd0
jmp 0x386530
jmp 0x386532
movq 0x188(%rsp), %rax
addq $0x1, %rax
movq %rax, 0x188(%rsp)
jmp 0x386502
leaq 0x22132f(%rip), %rsi    # 0x5a787e
leaq 0xa0(%rsp), %rdi
leaq 0x398(%rsp), %rdx
callq 0x3784f0
jmp 0x386566
leaq 0x223544(%rip), %rdx    # 0x5a9ab1
leaq 0xc0(%rsp), %rdi
leaq 0xa0(%rsp), %rsi
callq 0x29dc30
jmp 0x386584
leaq 0x60(%rsp), %rdi
movl $0x65f4, %esi           # imm = 0x65F4
callq 0x371f20
jmp 0x386595
leaq 0x220977(%rip), %rsi    # 0x5a6f13
leaq 0x80(%rsp), %rdi
leaq 0x60(%rsp), %rdx
callq 0x29dd70
jmp 0x3865b0
leaq 0xe0(%rsp), %rdi
movl $0x1, %esi
leaq 0x368(%rsp), %rdx
leaq 0xc0(%rsp), %rcx
leaq 0x80(%rsp), %r8
callq 0x3741e0
jmp 0x3865dc
movq 0x50(%rsp), %rdi
leaq 0xe0(%rsp), %rsi
callq 0x371e40
jmp 0x3865f0
leaq 0xe0(%rsp), %rdi
callq 0x371330
leaq 0x80(%rsp), %rdi
callq 0x11b838
leaq 0x60(%rsp), %rdi
callq 0x11b838
leaq 0xc0(%rsp), %rdi
callq 0x11b838
leaq 0xa0(%rsp), %rdi
callq 0x11b838
callq 0x2821f0
movq %rax, 0x3c0(%rsp)
movl $0x1, 0x22c(%rsp)
jmp 0x3866fa
movq %rax, %rcx
movl %edx, %eax
movq %rcx, 0x360(%rsp)
movl %eax, 0x35c(%rsp)
jmp 0x3866eb
movq %rax, %rcx
movl %edx, %eax
movq %rcx, 0x360(%rsp)
movl %eax, 0x35c(%rsp)
jmp 0x3866de
movq %rax, %rcx
movl %edx, %eax
movq %rcx, 0x360(%rsp)
movl %eax, 0x35c(%rsp)
jmp 0x3866d4
movq %rax, %rcx
movl %edx, %eax
movq %rcx, 0x360(%rsp)
movl %eax, 0x35c(%rsp)
jmp 0x3866c7
movq %rax, %rcx
movl %edx, %eax
movq %rcx, 0x360(%rsp)
movl %eax, 0x35c(%rsp)
leaq 0xe0(%rsp), %rdi
callq 0x371330
leaq 0x80(%rsp), %rdi
callq 0x11b838
leaq 0x60(%rsp), %rdi
callq 0x11b838
leaq 0xc0(%rsp), %rdi
callq 0x11b838
leaq 0xa0(%rsp), %rdi
callq 0x11b838
jmp 0x386724
leaq 0x368(%rsp), %rdi
callq 0x2512e0
leaq 0x398(%rsp), %rdi
callq 0x11b838
movq 0x3c0(%rsp), %rax
addq $0x3c8, %rsp            # imm = 0x3C8
retq
leaq 0x368(%rsp), %rdi
callq 0x2512e0
leaq 0x398(%rsp), %rdi
callq 0x11b838
movq 0x360(%rsp), %rdi
callq 0x11b4e0
nopl (%rax,%rax)