Source code of Windows XP (NT5)
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

100 lines
1.5 KiB

  1. page ,132
  2. title 87ctrigh - C interfaces - sinh, cosh, tanh
  3. ;***
  4. ;87ctrigh.asm - hyperbolic trig functions (8087/emulator version)
  5. ;
  6. ; Copyright (c) 1984-2001, Microsoft Corporation. All rights reserved.
  7. ;
  8. ;Purpose:
  9. ; C interfaces for sinh, cosh, tanh functions (8087/emulator version)
  10. ;
  11. ;Revision History:
  12. ; 07-04-84 GFW initial version
  13. ; 05-08-87 BCM added C intrinsic interface (_CI...)
  14. ; 10-12-87 BCM changes for OS/2 Support Library
  15. ; 11-24-87 BCM added _loadds under ifdef DLL
  16. ; 01-18-88 BCM eliminated IBMC20; ifos2,noos2 ==> ifmt,nomt
  17. ; 08-26-88 WAJ 386 version
  18. ; 11-20-89 WAJ Don't need pascal for MTHREAD 386.
  19. ;
  20. ;*******************************************************************************
  21. .xlist
  22. include cruntime.inc
  23. .list
  24. .data
  25. extrn _OP_SINHjmptab:word
  26. extrn _OP_COSHjmptab:word
  27. extrn _OP_TANHjmptab:word
  28. page
  29. CODESEG
  30. extrn _ctrandisp1:near
  31. extrn _ctrandisp2:near
  32. public sinh
  33. sinh proc
  34. mov rdx, OFFSET _OP_SINHjmptab
  35. disp1::
  36. jmp _ctrandisp1
  37. sinh endp
  38. public cosh
  39. cosh proc
  40. mov rdx, OFFSET _OP_COSHjmptab
  41. jmp disp1
  42. cosh endp
  43. public tanh
  44. tanh proc
  45. mov rdx, OFFSET _OP_TANHjmptab
  46. jmp disp1
  47. tanh endp
  48. extrn _cintrindisp1:near
  49. extrn _cintrindisp2:near
  50. public _CIsinh
  51. _CIsinh proc
  52. mov rdx, OFFSET _OP_SINHjmptab
  53. idisp1::
  54. jmp _cintrindisp1
  55. _CIsinh endp
  56. public _CIcosh
  57. _CIcosh proc
  58. mov rdx, OFFSET _OP_COSHjmptab
  59. jmp idisp1
  60. _CIcosh endp
  61. public _CItanh
  62. _CItanh proc
  63. mov rdx, OFFSET _OP_TANHjmptab
  64. jmp idisp1
  65. _CItanh endp
  66. end