void mp2dfr(unsigned char a[], unsigned char s[], int n, int *m) {
  void mplsh(unsigned char u[], int n);
  void mpsmu(unsigned char w[], unsigned char u[], int n, int iv);
  int j;
  *m = (int)(2.408 * n);
  for (j = 1; j <= (*m); j++) {
    mpsmu(a, a, n, 10);
    s[j] = a[1] + 48;
    mplsh(a, n);
  }
}


x86 assembly (clang, -O0):
<mp2dfr>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %rcx,-0x20(%rbp)
cvtsi2sdl -0x14(%rbp),%xmm1
movsd  0xebc(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
movl   $0x1,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0x20(%rbp),%rcx
cmp    (%rcx),%eax
jg     11af <mp2dfr+0x8f>
mov    -0x8(%rbp),%rdi
mov    -0x8(%rbp),%rsi
mov    -0x14(%rbp),%edx
mov    $0xa,%ecx
call   1030 <mpsmu@plt>
mov    -0x8(%rbp),%rax
movzbl 0x1(%rax),%eax
add    $0x30,%eax
mov    %al,%dl
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x8(%rbp),%rdi
mov    -0x14(%rbp),%esi
call   1040 <mplsh@plt>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1159 <mp2dfr+0x39>
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<mp2dfr>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
cvtsi2sd %edx,%xmm0
mulsd  0xecc(%rip),%xmm0
cvttsd2si %xmm0,%eax
mov    %eax,(%rcx)
test   %eax,%eax
jle    1185 <mp2dfr+0x65>
mov    %rcx,%r15
mov    %edx,%r12d
mov    %rsi,%r14
mov    %rdi,%rbx
xor    %ebp,%ebp
nopl   0x0(%rax)
mov    %rbx,%rdi
mov    %rbx,%rsi
mov    %r12d,%edx
mov    $0xa,%ecx
call   1030 <mpsmu@plt>
movzbl 0x1(%rbx),%eax
add    $0x30,%al
mov    %al,0x1(%r14,%rbp,1)
mov    %rbx,%rdi
mov    %r12d,%esi
call   1040 <mplsh@plt>
movslq (%r15),%rax
add    $0x1,%rbp
cmp    %rax,%rbp
jl     1150 <mp2dfr+0x30>
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @mp2dfr(i8* %0, i8* %1, i32 %2, i32* %3) {
%5 = alloca i8*
%6 = alloca i8*
%7 = alloca i32
%8 = alloca i32*
%9 = alloca i32
store i8* %0, i8** %5
store i8* %1, i8** %6
store i32 %2, i32* %7
store i32* %3, i32** %8
%10 = load i32, i32* %7
%11 = sitofp i32 %10 to double
%12 = fmul double 2.408000e+00, %11
%13 = fptosi double %12 to i32
%14 = load i32*, i32** %8
store i32 %13, i32* %14
store i32 1, i32* %9
br label %15
15: ; preds = %36, %4
%16 = load i32, i32* %9
%17 = load i32*, i32** %8
%18 = load i32, i32* %17
%19 = icmp sle i32 %16, %18
br i1 %19, label %20, label %39
20: ; preds = %15
%21 = load i8*, i8** %5
%22 = load i8*, i8** %5
%23 = load i32, i32* %7
%24 = load i8*, i8** %5
%25 = getelementptr inbounds i8, i8* %24, i64 1
%26 = load i8, i8* %25
%27 = zext i8 %26 to i32
%28 = add nsw i32 %27, 48
%29 = trunc i32 %28 to i8
%30 = load i8*, i8** %6
%31 = load i32, i32* %9
%32 = sext i32 %31 to i64
%33 = getelementptr inbounds i8, i8* %30, i64 %32
store i8 %29, i8* %33
%34 = load i8*, i8** %5
%35 = load i32, i32* %7
br label %36
36: ; preds = %20
%37 = load i32, i32* %9
%38 = add nsw i32 %37, 1
store i32 %38, i32* %9
br label %15
39: ; preds = %15
ret void
}

LLVM IR (-O2):
define void @mp2dfr(i8* %0, i8* nocapture writeonly %1, i32 %2, i32* nocapture %3) {
%5 = sitofp i32 %2 to double
%6 = fmul double %5, 2.408000e+00
%7 = fptosi double %6 to i32
store i32 %7, i32* %3
%8 = icmp slt i32 %7, 1
br i1 %8, label %20, label %9
9: ; preds = %4
%10 = getelementptr inbounds i8, i8* %0, i64 1
br label %11
11: ; preds = %9, %11
%12 = phi i64 [ 1, %9 ], [ %16, %11 ]
tail call void @mpsmu(i8* %0, i8* %0, i32 %2, i32 10)
%13 = load i8, i8* %10
%14 = add i8 %13, 48
%15 = getelementptr inbounds i8, i8* %1, i64 %12
store i8 %14, i8* %15
tail call void @mplsh(i8* %0, i32 %2)
%16 = add nuw nsw i64 %12, 1
%17 = load i32, i32* %3
%18 = sext i32 %17 to i64
%19 = icmp slt i64 %12, %18
br i1 %19, label %11, label %20
20: ; preds = %11, %4
ret void
}