Home Explore Help
Register Sign In
chaosmonk
/
CHIP-linux-libre
Watch 1
Star 0
Fork 0
Files Issues 0 Pull Requests 0 Wiki
Branch: master
Branches Tags
CHIP-linux-l...
/
arch
/
sh
/
lib
/
udiv_qrnnd.S

udiv_qrnnd.S 2.2 KB
Permalink History Raw

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182 
  1. /* Copyright (C) 1994, 1995, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
    2. 

  2.    2004, 2005, 2006
    3. 

  3.    Free Software Foundation, Inc.
    4. 

  4. 

  5. This file is free software; you can redistribute it and/or modify it
    6. 

  6. under the terms of the GNU General Public License as published by the
    7. 

  7. Free Software Foundation; either version 2, or (at your option) any
    8. 

  8. later version.
    9. 

  9. 

  10. In addition to the permissions in the GNU General Public License, the
    11. 

  11. Free Software Foundation gives you unlimited permission to link the
    12. 

  12. compiled version of this file into combinations with other programs,
    13. 

  13. and to distribute those combinations without any restriction coming
    14. 

  14. from the use of this file.  (The General Public License restrictions
    15. 

  15. do apply in other respects; for example, they cover modification of
    16. 

  16. the file, and distribution when not linked into a combine
    17. 

  17. executable.)
    18. 

  18. 

  19. This file is distributed in the hope that it will be useful, but
    20. 

  20. WITHOUT ANY WARRANTY; without even the implied warranty of
    21. 

  21. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    22. 

  22. General Public License for more details.
    23. 

  23. 

  24. You should have received a copy of the GNU General Public License
    25. 

  25. along with this program; see the file COPYING.  If not, write to
    26. 

  26. the Free Software Foundation, 51 Franklin Street, Fifth Floor,
    27. 

  27. Boston, MA 02110-1301, USA.  */
    28. 

  28. 

  29. !! libgcc routines for the Renesas / SuperH SH CPUs.
    30. 

  30. !! Contributed by Steve Chamberlain.
    31. 

  31. !! sac@cygnus.com
    32. 

  32. 

  33. !! ashiftrt_r4_x, ___ashrsi3, ___ashlsi3, ___lshrsi3 routines
    34. 

  34. !! recoded in assembly by Toshiyasu Morita
    35. 

  35. !! tm@netcom.com
    36. 

  36. 

  37. /* SH2 optimizations for ___ashrsi3, ___ashlsi3, ___lshrsi3 and
    38. 

  38.    ELF local label prefixes by J"orn Rennecke
    39. 

  39.    amylaar@cygnus.com  */
    40. 

  40. 

  41. 	/* r0: rn r1: qn */ /* r0: n1 r4: n0 r5: d r6: d1 */ /* r2: __m */
    42. 

  42. 	/* n1 < d, but n1 might be larger than d1.  */
    43. 

  43. 	.global __udiv_qrnnd_16
    44. 

  44. 	.balign 8
    45. 

  45. __udiv_qrnnd_16:
    46. 

  46. 	div0u
    47. 

  47. 	cmp/hi r6,r0
    48. 

  48. 	bt .Lots
    49. 

  49. 	.rept 16
    50. 

  50. 	div1 r6,r0 
    51. 

  51. 	.endr
    52. 

  52. 	extu.w r0,r1
    53. 

  53. 	bt 0f
    54. 

  54. 	add r6,r0
    55. 

  55. 0:	rotcl r1
    56. 

  56. 	mulu.w r1,r5
    57. 

  57. 	xtrct r4,r0
    58. 

  58. 	swap.w r0,r0
    59. 

  59. 	sts macl,r2
    60. 

  60. 	cmp/hs r2,r0
    61. 

  61. 	sub r2,r0
    62. 

  62. 	bt 0f
    63. 

  63. 	addc r5,r0
    64. 

  64. 	add #-1,r1
    65. 

  65. 	bt 0f
    66. 

  66. 1:	add #-1,r1
    67. 

  67. 	rts
    68. 

  68. 	add r5,r0
    69. 

  69. 	.balign 8
    70. 

  70. .Lots:
    71. 

  71. 	sub r5,r0
    72. 

  72. 	swap.w r4,r1
    73. 

  73. 	xtrct r0,r1
    74. 

  74. 	clrt
    75. 

  75. 	mov r1,r0
    76. 

  76. 	addc r5,r0
    77. 

  77. 	mov #-1,r1
    78. 

  78. 	bf/s 1b
    79. 

  79. 	 shlr16 r1
    80. 

  80. 0:	rts
    81. 

  81. 	 nop
    82. 

  82.