math.inc 3.0 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697
  1. {
  2. $Id$
  3. This file is part of the Free Pascal run time library.
  4. Copyright (c) 2000 by Jonas Maebe and other members of the
  5. Free Pascal development team
  6. Implementation of mathamatical Routines (only for real)
  7. See the file COPYING.FPC, included in this distribution,
  8. for details about the copyright.
  9. This program is distributed in the hope that it will be useful,
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  12. **********************************************************************}
  13. {$define FPC_SYSTEM_HAS_ABS}
  14. function abs(d : extended) : extended;[internproc:in_abs_extended];
  15. {$define FPC_SYSTEM_HAS_SQR}
  16. function sqr(d : extended) : extended;[internproc:in_sqr_extended];
  17. {$define FPC_SYSTEM_HAS_SQRT}
  18. function sqrt(d : extended) : extended;[internproc:in_sqrt_extended];
  19. {
  20. $Log$
  21. Revision 1.10 2004-10-03 12:41:30 florian
  22. * made sqrt, sqr and abs internal for the sparc
  23. Revision 1.9 2004/05/31 14:31:57 peter
  24. * remove comment warnings
  25. Revision 1.8 2004/01/06 21:33:38 peter
  26. * remove generic functions
  27. Revision 1.7 2003/09/14 15:02:24 peter
  28. * remove int64 to double helpers
  29. Revision 1.6 2003/09/02 17:41:49 peter
  30. * updated for int64 to double
  31. Revision 1.5 2003/09/01 20:46:32 peter
  32. * new dummies
  33. Revision 1.4 2003/04/23 21:28:21 peter
  34. * fpc_round added, needed for int64 currency
  35. Revision 1.3 2003/01/22 20:45:15 mazen
  36. * making math code in RTL compiling.
  37. *NB : This does NOT mean necessary that it will generate correct code!
  38. Revision 1.2 2003/01/20 22:21:36 mazen
  39. * many stuff related to RTL fixed
  40. Revision 1.1 2002/12/24 21:30:20 mazen
  41. - some writeln(s) removed in compiler
  42. + many files added to RTL
  43. * some errors fixed in RTL
  44. Revision 1.14 2002/11/28 11:04:16 olle
  45. * macos: refs to globals in beginasm adapted to macos
  46. Revision 1.13 2002/10/21 18:08:28 jonas
  47. * round has int64 instead of longint result
  48. Revision 1.12 2002/09/08 13:00:21 jonas
  49. * made pi an internproc instead of internconst
  50. Revision 1.11 2002/09/07 16:01:26 peter
  51. * old logs removed and tabs fixed
  52. Revision 1.10 2002/08/18 22:11:10 florian
  53. * fixed remaining assembler errors
  54. Revision 1.9 2002/08/18 21:37:48 florian
  55. * several errors in inline assembler fixed
  56. Revision 1.8 2002/08/10 17:14:36 jonas
  57. * various fixes, mostly changing the names of the modifies registers to
  58. upper case since that seems to be required by the compiler
  59. Revision 1.7 2002/07/31 16:58:12 jonas
  60. * fixed conversion from int64/qword to double errors
  61. Revision 1.6 2002/07/29 21:28:17 florian
  62. * several fixes to get further with linux/ppc system unit compilation
  63. Revision 1.5 2002/07/28 21:39:29 florian
  64. * made abs a compiler proc if it is generic
  65. Revision 1.4 2002/07/28 20:43:49 florian
  66. * several fixes for linux/powerpc
  67. * several fixes to MT
  68. }