cpuinfo.pas 2.9 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091
  1. {
  2. $Id$
  3. Copyright (c) 1998-2000 by Florian Klaempfl
  4. Basic Processor information
  5. This program is free software; you can redistribute it and/or modify
  6. it under the terms of the GNU General Public License as published by
  7. the Free Software Foundation; either version 2 of the License, or
  8. (at your option) any later version.
  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. See the
  12. GNU General Public License for more details.
  13. You should have received a copy of the GNU General Public License
  14. along with this program; if not, write to the Free Software
  15. Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  16. ****************************************************************************
  17. }
  18. Unit cpuinfo;
  19. {$i defines.inc}
  20. Interface
  21. Type
  22. AWord = Cardinal;
  23. PAWord = ^AWord;
  24. { this must be an ordinal type with the same size as a pointer }
  25. { Note: must be unsigned!! Otherwise, ugly code like }
  26. { pointer(-1) will result in a pointer with the value }
  27. { $fffffffffffffff on a 32bit machine if the compiler uses }
  28. { int64 constants internally (JM) }
  29. TConstPtrUInt = cardinal;
  30. Const
  31. { Size of native extended type }
  32. extended_size = 10;
  33. Implementation
  34. end.
  35. {
  36. $Log$
  37. Revision 1.6 2002-04-07 13:41:50 carl
  38. - moved type constant
  39. Revision 1.5 2002/04/02 17:11:34 peter
  40. * tlocation,treference update
  41. * LOC_CONSTANT added for better constant handling
  42. * secondadd splitted in multiple routines
  43. * location_force_reg added for loading a location to a register
  44. of a specified size
  45. * secondassignment parses now first the right and then the left node
  46. (this is compatible with Kylix). This saves a lot of push/pop especially
  47. with string operations
  48. * adapted some routines to use the new cg methods
  49. Revision 1.4 2001/09/02 21:18:29 peter
  50. * split constsym.value in valueord,valueordptr,valueptr. The valueordptr
  51. is used for holding target platform pointer values. As those can be
  52. bigger than the source platform.
  53. Revision 1.3 2001/06/03 20:21:08 peter
  54. * Kylix fixes, mostly case names of units
  55. Revision 1.2 2001/02/08 13:09:03 jonas
  56. * fixed web bug 1396: tpointerord is now a cardinal instead of a longint,
  57. but added a hack in ncnv so that pointer(-1) still works
  58. Revision 1.1 2000/10/15 09:39:37 peter
  59. * moved cpu*.pas to i386/
  60. * renamed n386 to common cpunode
  61. Revision 1.5 2000/09/24 15:06:14 peter
  62. * use defines.inc
  63. Revision 1.4 2000/08/16 13:06:06 florian
  64. + support of 64 bit integer constants
  65. Revision 1.3 2000/08/12 06:45:08 florian
  66. + type TConstExprInt added
  67. Revision 1.2 2000/07/13 11:32:39 michael
  68. + removed logs
  69. }