math64.s
上传用户:zhongxx05
上传日期:2007-06-06
资源大小:33641k
文件大小:3k
源码类别:

Symbian

开发平台:

C/C++

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