math64.s
上传用户:dangjiwu
上传日期:2013-07-19
资源大小:42019k
文件大小:4k
源码类别:

Symbian

开发平台:

Visual C++

  1. ; ***** BEGIN LICENSE BLOCK *****
  2. ; Source last modified: $Id: math64.s,v 1.2.46.1 2004/07/09 02:00:51 hubbe Exp $
  3. ; * Portions Copyright (c) 1995-2002 RealNetworks, Inc. All Rights Reserved.
  4. ; The contents of this file, and the files included with this file,
  5. ; are subject to the current version of the RealNetworks Public
  6. ; Source License (the "RPSL") available at
  7. ; http://www.helixcommunity.org/content/rpsl unless you have licensed
  8. ; the file under the current version of the RealNetworks Community
  9. ; Source License (the "RCSL") available at
  10. ; http://www.helixcommunity.org/content/rcsl, in which case the RCSL
  11. ; will apply. You may also obtain the license terms directly from
  12. ; RealNetworks.  You may not use this file except in compliance with
  13. ; the RPSL or, if you have a valid RCSL with RealNetworks applicable
  14. ; to this file, the RCSL.  Please see the applicable RPSL or RCSL for
  15. ; the rights, obligations and limitations governing use of the
  16. ; contents of the file.
  17. ; Alternatively, the contents of this file may be used under the
  18. ; terms of the GNU General Public License Version 2 or later (the
  19. ; "GPL") in which case the provisions of the GPL are applicable
  20. ; instead of those above. If you wish to allow use of your version of
  21. ; this file only under the terms of the GPL, and not to allow others
  22. ; to use your version of this file under the terms of either the RPSL
  23. ; or RCSL, indicate your decision by deleting the provisions above
  24. ; and replace them with the notice and other provisions required by
  25. ; the GPL. If you do not delete the provisions above, a recipient may
  26. ; use your version of this file under the terms of any one of the
  27. ; RPSL, the RCSL or the GPL.
  28. ; This file is part of the Helix DNA Technology. RealNetworks is the
  29. ; developer of the Original Code and owns the copyrights in the
  30. ; portions it created.
  31. ; This file, and the files included with this file, is distributed
  32. ; and made available on an 'AS IS' basis, WITHOUT WARRANTY OF ANY
  33. ; KIND, EITHER EXPRESS OR IMPLIED, AND REALNETWORKS HEREBY DISCLAIMS
  34. ; ALL SUCH WARRANTIES, INCLUDING WITHOUT LIMITATION, ANY WARRANTIES
  35. ; OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, QUIET
  36. ; ENJOYMENT OR NON-INFRINGEMENT.
  37. ; Technology Compatibility Kit Test Suite(s) Location:
  38. ;    http://www.helixcommunity.org/content/tck
  39. ; Contributor(s):
  40. ; ***** END LICENSE BLOCK *****
  41. ;/* assembly.s
  42. ; * 
  43. ; * the assembly routines are written in this separate .s file because EVC++ won't inline...
  44. ; *
  45. ; * Notes on APCS (ARM procedure call standard):
  46. ; *  - first four arguments are in r0-r3
  47. ; *  - additional argumets are pushed onto stack in reverse order
  48. ; *  - return value goes in r0
  49. ; *  - routines can overwrite r0-r3, r12 without saving
  50. ; *  - other registers must be preserved with stm/ldm commands
  51. ; * 
  52. ; * Equivalent register names:
  53. ; *
  54. ; * r0  r1  r2  r3  r4  r5  r6  r7  r8  r9  r10 r11 r12 r13 r14 r15
  55. ; * ---------------------------------------------------------------
  56. ; * a1  a2  a3  a4  v1  v2  v3  v4  v5  v6  sl  fp  ip  sp  lr  pc
  57. ; */
  58. INCLUDE kxarm.h
  59. TEXTAREA
  60. ; int MULSHIFT32(int x, int y)
  61. LEAF_ENTRY MulShift32
  62. smull r2,r0,r1,r0
  63. mov   pc, lr
  64. ENTRY_END MulShift32
  65. ; int MulShift31(int x, int y)
  66. LEAF_ENTRY MulShift31
  67. smull r2,r0,r1,r0
  68. mov   r2,r2,lsr #31
  69. orr   r0,r2,r0,lsl #1
  70. mov   pc, lr
  71. ENTRY_END MulShift31
  72. ; int MULSHIFT30(int x, int y)
  73. LEAF_ENTRY MulShift30
  74. smull r2,r0,r1,r0
  75. mov   r2,r2,lsr #30
  76. orr   r0,r2,r0,lsl #2
  77. mov   pc, lr
  78. ENTRY_END MulShift30
  79. ; int MulShiftN(int x, int y, int n)
  80. LEAF_ENTRY MulShiftN
  81. smull r3,r0,r1,r0  ; r0 hi, h3 lo
  82. mov   r3,r3,lsr r2 ; shift lo right by r2 
  83. rsb   r2,r2,#32
  84. orr   r0,r3,r0,lsl r2 ; shift hi left by 32-r2, and or in
  85. mov   pc, lr
  86. ENTRY_END MulShiftN
  87. END