int Bignum_Multiply(int ctx, int q, int m, int d) __attribute__((naked));
int Bignum_Multiply(int ctx, int q, int m, int d)
{
  (void)ctx; (void)q; (void)m; (void)d;
  __asm__ volatile(
  ".syntax unified\n"
  ".thumb\n"
  "push {r4, r5, r6, r7, lr}\n"
  "mov r7, r9\n"
  "mov r6, r8\n"
  "push {r6, r7}\n"
  "mov r9, r0\n"
  "adds r5, r1, #0\n"
  "adds r4, r2, #0\n"
  "mov r8, r3\n"
  "ldr r6, [r5, #16]\n"
  "adds r3, r5, #0\n"
  "adds r3, #20\n"
  "movs r7, #0\n"
  "ldr r0, .Lmask\n"
  "mov ip, r0\n"
  "loop_%=:\n"
  "ldr r1, [r3, #0]\n"
  "adds r0, r1, #0\n"
  "mov r2, ip\n"
  "ands r0, r2\n"
  "adds r2, r0, #0\n"
  "muls r2, r4\n"
  "add r2, r8\n"
  "lsrs r1, r1, #16\n"
  "adds r0, r1, #0\n"
  "muls r0, r4\n"
  "lsrs r1, r2, #16\n"
  "adds r0, r0, r1\n"
  "lsrs r1, r0, #16\n"
  "mov r8, r1\n"
  "lsls r0, r0, #16\n"
  "mov r1, ip\n"
  "ands r2, r1\n"
  "adds r0, r0, r2\n"
  "stmia r3!, {r0}\n"
  "adds r7, #1\n"
  "cmp r7, r6\n"
  "blt loop_%=\n"
  "mov r2, r8\n"
  "cmp r2, #0\n"
  "beq done_%=\n"
  "ldr r0, [r5, #8]\n"
  "cmp r6, r0\n"
  "blt store_%=\n"
  "ldr r1, [r5, #4]\n"
  "adds r1, #1\n"
  "mov r0, r9\n"
  "bl Bignum_GetDigits\n"
  "adds r4, r0, #0\n"
  "adds r0, #12\n"
  "adds r1, r5, #0\n"
  "adds r1, #12\n"
  "ldr r2, [r5, #16]\n"
  "lsls r2, r2, #2\n"
  "adds r2, #8\n"
  "bl Physics_MemCopyFast\n"
  "mov r0, r9\n"
  "adds r1, r5, #0\n"
  "bl Bignum_ShiftRight\n"
  "adds r5, r4, #0\n"
  "store_%=:\n"
  "lsls r1, r6, #2\n"
  "adds r0, r5, #0\n"
  "adds r0, #20\n"
  "adds r0, r0, r1\n"
  "mov r1, r8\n"
  "str r1, [r0, #0]\n"
  "adds r6, #1\n"
  "str r6, [r5, #16]\n"
  "done_%=:\n"
  "adds r0, r5, #0\n"
  "pop {r3, r4}\n"
  "mov r8, r3\n"
  "mov r9, r4\n"
  "pop {r4, r5, r6, r7, pc}\n"
  ".Lmask: .word 0x0000FFFF\n"
  ::: "r0","r1","r2","r3","r4","r5","r6","r7","memory");
}
