user: 请将以下的汇编代码转换成C语言代码:

```asm
<outfloat>:
  endbr64
  push   %r14
  pxor   %xmm3,%xmm3
  movapd %xmm0,%xmm2
  movapd %xmm0,%xmm1
  push   %r13
  cmpltsd %xmm3,%xmm2
  mov    %esi,%r9d
  mov    %ecx,%esi
  push   %r12
  push   %rbp
  mov    %r8,%rbp
  push   %rbx
  mov    %edx,%ebx
  sub    $0x10,%rsp
  xorpd  D8(%rip),%xmm1
  andpd  %xmm2,%xmm1
  andnpd %xmm0,%xmm2
  orpd   %xmm2,%xmm1
  test   %r9d,%r9d
  jle    L78
  movsd  D25(%rip),%xmm2
  xor    %eax,%eax
  nopw   0x0(%rax,%rax,1)
L39:
  mulsd  %xmm2,%xmm1
  add    $0x1,%eax
  cmp    %eax,%r9d
  jne    L39
  addsd  D4(%rip),%xmm1
  mov    $0x2,%edx
  movslq %edi,%r11
  add    %r9d,%edx
  lea    0x0(%rbp,%r11,1),%r12
  cvttsd2si %xmm1,%eax
  cmp    %edi,%edx
  jg     L167
L268:
  movslq %r9d,%rdx
  lea    -0x1(%r11),%r13
  sub    %rdx,%r11
  lea    0x0(%rbp,%r13,1),%rcx
  lea    0x0(%rbp,%r11,1),%r10
  cmp    %r10,%rcx
  jb     L3
  sub    $0x1,%r10
  mov    %rcx,%r8
  nopl   0x0(%rax,%rax,1)
L31:
  movslq %eax,%rdx
  mov    %eax,%r14d
  sub    $0x1,%r8
  imul   $0x66666667,%rdx,%rdx
  sar    $0x1f,%r14d
  sar    $0x22,%rdx
  sub    %r14d,%edx
  lea    (%rdx,%rdx,4),%r14d
  add    %r14d,%r14d
  sub    %r14d,%eax
  add    $0x30,%eax
  mov    %al,0x1(%r8)
  mov    %edx,%eax
  cmp    %r8,%r10
  jne    L31
  sub    %r13,%r11
  lea    -0x1(%rcx,%r11,1),%rcx
L3:
  test   %r9d,%r9d
  jle    L29
  movb   $0x2e,(%rcx)
  sub    $0x1,%rcx
L29:
  test   %eax,%eax
  je     L222
  cmp    %rbp,%rcx
  jae    L53
  jmp    L167
  nopw   0x0(%rax,%rax,1)
L117:
  test   %eax,%eax
  je     L236
L53:
  movslq %eax,%rdx
  mov    %eax,%r8d
  sub    $0x1,%rcx
  imul   $0x66666667,%rdx,%rdx
  sar    $0x1f,%r8d
  sar    $0x22,%rdx
  sub    %r8d,%edx
  lea    (%rdx,%rdx,4),%r8d
  add    %r8d,%r8d
  sub    %r8d,%eax
  add    $0x30,%eax
  mov    %al,0x1(%rcx)
  mov    %edx,%eax
  cmp    %rcx,%rbp
  jbe    L117
  test   %edx,%edx
  jne    L167
L76:
  comisd %xmm0,%xmm3
  jbe    L236
  cmp    %rcx,%rbp
  ja     L167
  xchg   %ax,%ax
L236:
  mov    %rcx,%r13
  test   %esi,%esi
  jne    L190
  cmp    %rbp,%rcx
  jb     L211
L119:
  mov    %r13,%rax
  movsbl %bl,%esi
  mov    %rbp,%rdi
  movsd  %xmm0,0x8(%rsp)
  sub    %rbp,%rax
  lea    0x1(%rax),%rdx
  call   <memset@plt>
  movsd  0x8(%rsp),%xmm0
  mov    %r13,%rcx
  pxor   %xmm3,%xmm3
L211:
  comisd %xmm0,%xmm3
  ja     L185
L17:
  add    $0x10,%rsp
  mov    %r12,%rax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
  nopw   0x0(%rax,%rax,1)
L78:
  cmp    $0x1,%r9d
  addsd  D4(%rip),%xmm1
  movslq %edi,%r11
  sbb    %edx,%edx
  lea    0x0(%rbp,%r11,1),%r12
  add    $0x2,%edx
  add    %r9d,%edx
  cvttsd2si %xmm1,%eax
  cmp    %edi,%edx
  jle    L268
L167:
  mov    %rbp,%rsi
  xor    %eax,%eax
  call   <e_outfloat@plt>
  add    $0x10,%rsp
  mov    %r12,%rax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
  nopw   0x0(%rax,%rax,1)
L222:
  lea    -0x1(%rcx),%r13
  movb   $0x30,(%rcx)
  cmp    %r13,%rbp
  ja     L122
  test   %esi,%esi
  je     L119
L190:
  comisd %xmm0,%xmm3
  lea    0x1(%rbp),%rdi
  lea    0x1(%r13),%rax
  cmovbe %rbp,%rdi
  cmp    %r12,%rax
  jae    L186
  lea    -0x1(%r12),%rcx
  xor    %eax,%eax
  sub    %r13,%rcx
  nopw   0x0(%rax,%rax,1)
L37:
  movzbl 0x1(%r13,%rax,1),%edx
  mov    %dl,(%rdi,%rax,1)
  add    $0x1,%rax
  cmp    %rcx,%rax
  jne    L37
  add    %rax,%rdi
L186:
  cmp    %r12,%rdi
  jae    L90
  mov    %r12,%rdx
  movsbl %bl,%esi
  movsd  %xmm0,0x8(%rsp)
  sub    %rdi,%rdx
  call   <memset@plt>
  movsd  0x8(%rsp),%xmm0
  pxor   %xmm3,%xmm3
L90:
  comisd %xmm0,%xmm3
  jbe    L17
L152:
  movb   $0x2d,0x0(%rbp)
  add    $0x10,%rsp
  mov    %r12,%rax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
  cs nopw 0x0(%rax,%rax,1)
L185:
  cmp    $0x20,%bl
  jne    L152
  movb   $0x2d,(%rcx)
  jmp    L17
L122:
  mov    %r13,%rcx
  jmp    L76
```

tool_calls: name: parse_data
arguments: tag: D8
datatype: f32[4]
name: parse_data
arguments: tag: D25
datatype: f64
name: parse_data
arguments: tag: D4
datatype: f64

tool: {"D8": [0.0,-0.0,0.0,0.0]}

tool: D25: 10

tool: D4: 0.5

assistant: ```c
char *outfloat(value, width, nplace, fill_char, left_justify, p)
double value;
int width, nplace;
char fill_char;
int left_justify;
register char *p;
{
  register int i, intval;
  register char *place, *to, *from;
  int negative;
  negative = value < 0.0 ? 1 : 0;
  if (negative)
    value = -value;
  for (i = 0; i < nplace; i++)
    value *= 10.0;
  intval = value + 0.5;
  if (nplace + (nplace == 0 ? 1 : 2) > width) {
    e_outfloat(width, p);
    return p + width;
  }
  for (place = p + width - 1; place >= p + width - nplace; place--) {
    *place = '0' + intval % 10;
    intval /= 10;
  }
  if (nplace > 0)
    *place-- = '.';
  if (intval == 0)
    *place-- = '0';
  for (; place >= p; place--) {
    if (intval == 0)
      break;
    else {
      *place = '0' + intval % 10;
      intval /= 10;
    }
  }
  if (intval != 0) {
    e_outfloat(width, p);
    return p + width;
  }
  if (place < p && negative) {
    e_outfloat(width, p);
    return p + width;
  }
  if (left_justify) {
    for (from = place + 1, to = (negative ? p + 1 : p); from < p + width; from++, to++)
      *to = *from;
    for (; to < p + width; to++)
      *to = fill_char;
    if (negative)
      *p = '-';
  } else {
    for (to = place; to >= p; to--)
      *to = fill_char;
    if (negative) {
      if (fill_char == ' ')
        *place = '-';
      else
        *p = '-';
    }
  }
  return p + width;
}
```