27 for (
int k=0;
k<6;
k++) {
36 static const int UNSET = -1;
69 "Cannot determine byte-ordering of doubles on this system");
73 "Confusion in byte-ordering of doubles on this system");
85 std::ostringstream ss;
86 for (
int i=0; i<8; ++i) {
88 ss << std::hex << std::setw(2) << std::setfill(
'0') << (
int)db.
b[k];
94 std::vector<unsigned long>
v(2);
98 v[0] = ((
static_cast<unsigned long>(db.
b[
byte_order[0]])) << 24)
99 | ((static_cast<unsigned long>(db.
b[
byte_order[1]])) << 16)
100 | ((
static_cast<unsigned long>(db.
b[
byte_order[2]])) << 8)
101 | ((static_cast<unsigned long>(db.
b[
byte_order[3]])) );
102 v[1] = ((
static_cast<unsigned long>(db.
b[
byte_order[4]])) << 24)
103 | ((static_cast<unsigned long>(db.
b[
byte_order[5]])) << 16)
104 | ((
static_cast<unsigned long>(db.
b[
byte_order[6]])) << 8)
105 | ((static_cast<unsigned long>(db.
b[
byte_order[7]])) );
111 unsigned char bytes[8];
113 bytes[0] =
static_cast<unsigned char>((v[0] >> 24) & 0xFF);
114 bytes[1] =
static_cast<unsigned char>((v[0] >> 16) & 0xFF);
115 bytes[2] =
static_cast<unsigned char>((v[0] >> 8) & 0xFF);
116 bytes[3] =
static_cast<unsigned char>((v[0] ) & 0xFF);
117 bytes[4] =
static_cast<unsigned char>((v[1] >> 24) & 0xFF);
118 bytes[5] =
static_cast<unsigned char>((v[1] >> 16) & 0xFF);
119 bytes[6] =
static_cast<unsigned char>((v[1] >> 8) & 0xFF);
120 bytes[7] =
static_cast<unsigned char>((v[1] ) & 0xFF);
121 for (
int i=0; i<8; ++i) {