user: Demonstrate the C code that generates the assembly output below:

```asm
<parse_parlist>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x50,%rsp
  mov    %rdi,-0x38(%rbp)
  mov    %rsi,-0x40(%rbp)
  mov    %rdx,-0x48(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  movl   $0x0,-0x20(%rbp)
  movl   $0x0,-0x1c(%rbp)
  jmp    L110
L199:
  mov    -0x1c(%rbp),%eax
  movslq %eax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  movzbl (%rax),%eax
  cmp    $0x20,%al
  jne    L111
  addl   $0x1,-0x1c(%rbp)
L110:
  mov    -0x38(%rbp),%rax
  mov    %rax,%rdi
  call   <strlen@plt>
  cmp    %eax,-0x1c(%rbp)
  jl     L199
  jmp    L98
L111:
  nop
L98:
  mov    -0x38(%rbp),%rax
  mov    %rax,%rdi
  call   <strlen@plt>
  cmp    %eax,-0x1c(%rbp)
  je     L72
  mov    -0x38(%rbp),%rax
  mov    %rax,%rdi
  call   <strlen@plt>
  test   %eax,%eax
  je     L80
  lea    -0x18(%rbp),%rdx
  mov    -0x38(%rbp),%rax
  lea    D18(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strtok_r@plt>
  mov    %rax,-0x10(%rbp)
  mov    -0x10(%rbp),%rax
  movzbl (%rax),%eax
  test   %al,%al
  je     L194
  lea    -0x24(%rbp),%rdx
  mov    -0x10(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <find_variable@plt>
  mov    -0x24(%rbp),%eax
  test   %eax,%eax
  jle    L94
  mov    -0x24(%rbp),%edx
  mov    -0x48(%rbp),%rax
  mov    (%rax),%ecx
  mov    -0x20(%rbp),%eax
  add    %ecx,%eax
  cltq
  lea    0x0(,%rax,4),%rcx
  mov    -0x40(%rbp),%rax
  add    %rcx,%rax
  sub    $0x1,%edx
  mov    %edx,(%rax)
  addl   $0x1,-0x20(%rbp)
  jmp    L82
L94:
  mov    -0x10(%rbp),%rax
  mov    %rax,%rdi
  call   <get_param_index@plt>
  mov    %eax,-0x24(%rbp)
  mov    -0x24(%rbp),%eax
  test   %eax,%eax
  jle    L41
  mov    -0x24(%rbp),%edx
  mov    -0x48(%rbp),%rax
  mov    (%rax),%ecx
  mov    -0x20(%rbp),%eax
  add    %ecx,%eax
  cltq
  lea    0x0(,%rax,4),%rcx
  mov    -0x40(%rbp),%rax
  add    %rcx,%rax
  neg    %edx
  mov    %edx,(%rax)
  addl   $0x1,-0x20(%rbp)
  jmp    L82
L197:
  lea    -0x24(%rbp),%rdx
  mov    -0x10(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <find_variable@plt>
  mov    -0x24(%rbp),%eax
  test   %eax,%eax
  jle    L30
  mov    -0x24(%rbp),%edx
  mov    -0x48(%rbp),%rax
  mov    (%rax),%ecx
  mov    -0x20(%rbp),%eax
  add    %ecx,%eax
  cltq
  lea    0x0(,%rax,4),%rcx
  mov    -0x40(%rbp),%rax
  add    %rcx,%rax
  sub    $0x1,%edx
  mov    %edx,(%rax)
  addl   $0x1,-0x20(%rbp)
  jmp    L82
L30:
  mov    -0x10(%rbp),%rax
  mov    %rax,%rdi
  call   <get_param_index@plt>
  mov    %eax,-0x24(%rbp)
  mov    -0x24(%rbp),%eax
  test   %eax,%eax
  jle    L6
  mov    -0x24(%rbp),%edx
  mov    -0x48(%rbp),%rax
  mov    (%rax),%ecx
  mov    -0x20(%rbp),%eax
  add    %ecx,%eax
  cltq
  lea    0x0(,%rax,4),%rcx
  mov    -0x40(%rbp),%rax
  add    %rcx,%rax
  neg    %edx
  mov    %edx,(%rax)
  addl   $0x1,-0x20(%rbp)
L82:
  lea    -0x18(%rbp),%rax
  mov    %rax,%rdx
  lea    D18(%rip),%rax
  mov    %rax,%rsi
  mov    $0x0,%edi
  call   <strtok_r@plt>
  mov    %rax,-0x10(%rbp)
  cmpq   $0x0,-0x10(%rbp)
  jne    L197
  mov    -0x48(%rbp),%rax
  mov    (%rax),%edx
  mov    -0x20(%rbp),%eax
  add    %eax,%edx
  mov    -0x48(%rbp),%rax
  mov    %edx,(%rax)
  jmp    L38
L72:
  nop
  jmp    L38
L80:
  nop
  jmp    L38
L194:
  nop
  jmp    L38
L41:
  nop
  jmp    L38
L6:
  nop
L38:
  mov    -0x8(%rbp),%rax
  sub    %fs:0x28,%rax
  je     L71
  call   <__stack_chk_fail@plt>
L71:
  leave
  ret
```

tool_calls: name: disassemble_data
arguments: data_tag: D18
type_guessed: string

tool: D18:  ,

assistant: ```c
void parse_parlist(char *parlist, int *ipars, int *n) {
  char *item;
  char *toksave;
  int v, i = 0;
  int j;
  for (j = 0; j < strlen(parlist); j++) {
    if (parlist[j] != ' ')
      break;
  }
  if (j == strlen(parlist))
    return;
  if (strlen(parlist) == 0)
    return;
  item = strtok_r(parlist, " ,", &toksave);
  if (item[0] == 0L)
    return;
  find_variable(item, &v);
  if (v > 0) {
    ipars[i + *n] = v - 1;
    i++;
  } else {
    v = get_param_index(item);
    if (v <= 0)
      return;
    ipars[i + *n] = -v;
    i++;
  }
  while ((item = strtok_r(NULL, " ,", &toksave)) != NULL) {
    find_variable(item, &v);
    if (v > 0) {
      ipars[i + *n] = v - 1;
      i++;
    } else {
      v = get_param_index(item);
      if (v <= 0)
        return;
      ipars[i + *n] = -v;
      i++;
    }
  }
  *n = *n + i;
}
```