cpu()

Ecpu_type tfxx::ioswap::cpu

(

)

Check CPU model. ,.

check for my CPU model

Returns

return value indicates the CPU model found

Examples:

tests/fortraniotest.cc.

Definition at line 80 of file ioswap.cc.

References tfxx::ioswap::IOUnion< T >::bytes, cpu_Intel, cpu_Motorola, cpu_unknown, magic(), TFXX_assert, and tfxx::ioswap::IOUnion< T >::value.

Referenced by cpu_type().

{
  Ecpu_type result=cpu_unknown;
  IOUnion<int> u1,u2;
  TFXX_assert((sizeof(int) == 4),
              "The integer memory size on this CPU differs from the"
              "required value of 4");
  const int& intsize=sizeof(int);
  char test_seq[]="ABCD";
  // prepare sequence and reverse sequence
  for (int i=0; i<intsize; i++)
  {
    u1.bytes[i]=test_seq[i];
    u2.bytes[i]=test_seq[intsize-i-1];
  }
  // request magic number for sequence
  int magnum=magic(u1.bytes);
  // test against byte representation of sequence and reverse sequence
  if (magnum == u1.value)
  {
    result=cpu_Motorola;
  }
  else if (magnum == u2.value)
  {
    result=cpu_Intel;
  }
  return(result);
} // cpu()

Here is the call graph for this function:

Here is the caller graph for this function: