ghc/rts/gmp/mpn/x86/udiv.asm

   1 dnl  x86 mpn_udiv_qrnnd -- 2 by 1 limb division
   2
   3 dnl  Copyright (C) 1999, 2000 Free Software Foundation, Inc.
   4 dnl
   5 dnl  This file is part of the GNU MP Library.
   6 dnl
   7 dnl  The GNU MP Library is free software; you can redistribute it and/or
   8 dnl  modify it under the terms of the GNU Lesser General Public License as
   9 dnl  published by the Free Software Foundation; either version 2.1 of the
  10 dnl  License, or (at your option) any later version.
  11 dnl
  12 dnl  The GNU MP Library is distributed in the hope that it will be useful,
  13 dnl  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 dnl  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15 dnl  Lesser General Public License for more details.
  16 dnl
  17 dnl  You should have received a copy of the GNU Lesser General Public
  18 dnl  License along with the GNU MP Library; see the file COPYING.LIB.  If
  19 dnl  not, write to the Free Software Foundation, Inc., 59 Temple Place -
  20 dnl  Suite 330, Boston, MA 02111-1307, USA.
  21
  22
  23 include(`../config.m4')
  24
  25
  26 C mp_limb_t mpn_udiv_qrnnd (mp_limb_t *remptr, mp_limb_t high, mp_limb_t low,
  27 C                           mp_limb_t divisor);
  28
  29 defframe(PARAM_DIVISOR, 16)
  30 defframe(PARAM_LOW,     12)
  31 defframe(PARAM_HIGH,    8)
  32 defframe(PARAM_REMPTR,  4)
  33
  34         TEXT
  35         ALIGN(8)
  36 PROLOGUE(mpn_udiv_qrnnd)
  37 deflit(`FRAME',0)
  38         movl    PARAM_LOW, %eax
  39         movl    PARAM_HIGH, %edx
  40         divl    PARAM_DIVISOR
  41         movl    PARAM_REMPTR, %ecx
  42         movl    %edx, (%ecx)
  43         ret
  44 EPILOGUE()