Página inicial Explorar Ajuda
Registrar Entrar
akucxy
/
gcc
1
0
Fork 0
Arquivos Issues 0 Pull Requests 0 Wiki
Tree: 0b324a1ae7
Branches Tags
gcc
/
libgcc
/
config
/
rl78
/
smindi3.S

smindi3.S 2.0 KB
Histórico Raw

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576 
  1. ;   Copyright (C) 2017-2022 Free Software Foundation, Inc.
    2. 

  2. ;   Contributed by Sebastian Perta.
    3. 

  3. ; 
    4. 

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

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

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

  7. ; later version.
    8. 

  8. ; 
    9. 

  9. ; This file is distributed in the hope that it will be useful, but
    10. 

  10. ; WITHOUT ANY WARRANTY; without even the implied warranty of
    11. 

  11. ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    12. 

  12. ; General Public License for more details.
    13. 

  13. ; 
    14. 

  14. ; Under Section 7 of GPL version 3, you are granted additional
    15. 

  15. ; permissions described in the GCC Runtime Library Exception, version
    16. 

  16. ; 3.1, as published by the Free Software Foundation.
    17. 

  17. ;
    18. 

  18. ; You should have received a copy of the GNU General Public License and
    19. 

  19. ; a copy of the GCC Runtime Library Exception along with this program;
    20. 

  20. ; see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
    21. 

  21. ; <http://www.gnu.org/licenses/>.
    22. 

  22. 

  23. 

  24. #include "vregs.h"
    25. 

  25. 

  26.     .text
    27. 

  27. 

  28. START_FUNC ___smindi3
    29. 

  29. 

  30.     ; copy first argument/operand to the output registers
    31. 

  31.     movw   ax, [sp+4]
    32. 

  32.     movw   r8, ax
    33. 

  33.     movw   ax, [sp+6]
    34. 

  34.     movw   r10, ax
    35. 

  35.     movw   ax, [sp+8]
    36. 

  36.     movw   r12, ax
    37. 

  37.     movw   ax, [sp+10]
    38. 

  38.     movw   r14, ax
    39. 

  39. 

  40.     ; use 16-bit compares from the most significant words downto the least significant ones
    41. 

  41.     movw   ax, [sp+18]
    42. 

  42.     cmpw   ax, r14
    43. 

  43.     xor1   CY, a.7   ; first compare accounts for the
    44. 

  44.     xor1   CY, r15.7 ; sign bits of the two operands
    45. 

  45.     bc     $.L1
    46. 

  46.     bnz    $.L2
    47. 

  47. 

  48.     movw   ax, [sp+16]
    49. 

  49.     cmpw   ax, r12
    50. 

  50.     bc     $.L1
    51. 

  51.     bnz    $.L2
    52. 

  52. 

  53.     movw   ax, [sp+14]
    54. 

  54.     cmpw   ax, r10
    55. 

  55.     bc     $.L1
    56. 

  56.     bnz    $.L2
    57. 

  57. 

  58.     movw   ax, [sp+12]
    59. 

  59.     cmpw   ax, r8
    60. 

  60.     bc     $.L1
    61. 

  61.     ret
    62. 

  62. 

  63. .L1:
    64. 

  64.     ; copy second argument/operand to the output registers
    65. 

  65.     movw   ax, [sp+12]
    66. 

  66.     movw   r8, ax
    67. 

  67.     movw   ax, [sp+14]
    68. 

  68.     movw   r10, ax
    69. 

  69.     movw   ax, [sp+16]
    70. 

  70.     movw   r12, ax
    71. 

  71.     movw   ax, [sp+18]
    72. 

  72.     movw   r14, ax
    73. 

  73. .L2:
    74. 

  74.     ret
    75. 

  75. 

  76. END_FUNC ___smindi3
    77.