user: 请将这段汇编代码片段转换成等效的C代码：

```asm
<evaluate_unary_expression>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbx
  sub    $0x28,%rsp
  mov    %rdi,%r12
  mov    %fs:0x28,%rax
  mov    %rax,-0x38(%rbp)
  xor    %eax,%eax
  lea    D23(%rip),%rdi
  call   <strlen@plt>
  add    $0x1,%eax
  cltq
  add    $0xf,%rax
  mov    %rax,%rcx
  and    $0xfffffffffffffff0,%rcx
  and    $0xfffffffffffff000,%rax
  mov    %rsp,%rdx
  sub    %rax,%rdx
L67:
  cmp    %rdx,%rsp
  je     L118
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L67
L118:
  mov    %rcx,%rax
  and    $0xfff,%eax
  sub    %rax,%rsp
  test   %rax,%rax
  je     L154
  orq    $0x0,-0x8(%rsp,%rax,1)
L154:
  mov    %rsp,%r15
  movzbl (%r12),%ebx
  test   %bl,%bl
  je     L113
  mov    $0x0,%r14d
  jmp    L128
L95:
  test   %r14d,%r14d
  jne    L26
L119:
  mov    %r13d,%edi
  call   <isalpha@plt>
  test   %rax,%rax
  je     L140
  test   %r14d,%r14d
  jne    L155
  mov    $0x1,%r14d
L140:
  add    $0x1,%r12
L24:
  movzbl (%r12),%ebx
  test   %bl,%bl
  je     L113
L128:
  movsbl %bl,%r13d
  mov    %r13d,%edi
  call   <isdigit@plt>
  cmp    $0x2d,%bl
  je     L95
  test   %rax,%rax
  jne    L95
  jmp    L119
L26:
  mov    %r12,%rdi
  call   <skip_gcode_digits@plt>
  mov    %rax,%r12
  mov    $0x0,%r14d
  jmp    L24
L155:
  mov    %r12,%rbx
  mov    $0x0,%r13d
L54:
  add    $0x1,%r13
  movzbl (%rbx),%eax
  mov    %al,-0x1(%r15,%r13,1)
  add    $0x1,%rbx
  movsbl (%rbx),%edi
  call   <isalpha@plt>
  test   %rax,%rax
  jne    L54
  movb   $0x0,(%r15,%r13,1)
  mov    %rbx,%rdi
  call   <read_gcode_real@plt>
  movsd  %xmm0,-0x48(%rbp)
  mov    %rbx,%rdi
  call   <skip_gcode_digits@plt>
  mov    %rax,%rbx
  cmpb   $0x2f,(%rax)
  je     L2
L123:
  mov    %rbx,%rdi
  call   <strlen@plt>
  mov    %eax,%r13d
  lea    D24(%rip),%rdi
  call   <strlen@plt>
  lea    0x1(%r13,%rax,1),%esi
  mov    $0x1,%edi
  call   <calloc@plt>
  mov    %rax,%r13
  lea    D24(%rip),%rsi
  mov    %rax,%rdi
  call   <strcpy@plt>
  mov    %rbx,%rsi
  mov    %r13,%rdi
  call   <strcat@plt>
  movsd  -0x50(%rbp),%xmm1
  movsd  -0x48(%rbp),%xmm0
  mov    %r15,%rdi
  call   <_do_function@plt>
  mov    %eax,%ebx
  mov    %r12,%rdi
  call   <strlen@plt>
  mov    %eax,%esi
  mov    %ebx,%ecx
  mov    %r13,%rdx
  mov    %r12,%rdi
  call   <snprintf@plt>
  mov    %r13,%rdi
  call   <free@plt>
  mov    %r12,%rdi
  call   <skip_gcode_digits@plt>
  mov    %rax,%r12
  jmp    L24
L2:
  add    $0x1,%rbx
  mov    %rbx,%rdi
  call   <read_gcode_real@plt>
  movsd  %xmm0,-0x50(%rbp)
  mov    %rbx,%rdi
  call   <skip_gcode_digits@plt>
  mov    %rax,%rbx
  jmp    L123
L113:
  mov    -0x38(%rbp),%rax
  sub    %fs:0x28,%rax
  jne    L132
  lea    -0x28(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  pop    %rbp
  ret
L132:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: read_data
arguments: data_tag: D23
data_type: string
name: read_data
arguments: data_tag: D24
data_type: string

tool: D23: ROUND

tool: D24: %4.4f

assistant: ```c
void evaluate_unary_expression(char *line) {
  bool seenWord = false;
  char fname[strlen("ROUND") + 1], *sptr, *buf, c;
  uint8_t fni;
  double arg, sar;
  while ((c = *line)) {
    if ((isdigit(c) || c == '-') && seenWord) {
      line = (char *)skip_gcode_digits(line);
      seenWord = false;
      continue;
    } else if (isalpha(c)) {
      if (seenWord) {
        fni = 0;
        sptr = line;
        do {
          fname[fni++] = *line;
        } while (isalpha(*(++line)));
        fname[fni] = '\0';
        arg = read_gcode_real(line);
        line = (char *)skip_gcode_digits(line);
        if (*line == '/') {
          sar = read_gcode_real(++line);
          line = (char *)skip_gcode_digits(line);
        }
        buf = (char *)calloc(1, strlen(line) + strlen("%4.4f") + 1);
        strcpy(buf, "%4.4f");
        strcat(buf, line);
        line = sptr;
        snprintf(line, strlen(line), buf, _do_function(fname, arg, sar));
        free((void *)buf);
        line = (char *)skip_gcode_digits(line);
        continue;
      } else
        seenWord = true;
    }
    line++;
  }
  return;
}
```