|
QP/C++
|
00001 00002 // Product: QS/C++ 00003 // Last Updated for Version: 4.4.00 00004 // Date of the Last Update: Mar 28, 2012 00005 // 00006 // Q u a n t u m L e a P s 00007 // --------------------------- 00008 // innovating embedded systems 00009 // 00010 // Copyright (C) 2002-2012 Quantum Leaps, LLC. All rights reserved. 00011 // 00012 // This program is open source software: you can redistribute it and/or 00013 // modify it under the terms of the GNU General Public License as published 00014 // by the Free Software Foundation, either version 2 of the License, or 00015 // (at your option) any later version. 00016 // 00017 // Alternatively, this program may be distributed and modified under the 00018 // terms of Quantum Leaps commercial licenses, which expressly supersede 00019 // the GNU General Public License and are specifically designed for 00020 // licensees interested in retaining the proprietary status of their code. 00021 // 00022 // This program is distributed in the hope that it will be useful, 00023 // but WITHOUT ANY WARRANTY; without even the implied warranty of 00024 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00025 // GNU General Public License for more details. 00026 // 00027 // You should have received a copy of the GNU General Public License 00028 // along with this program. If not, see <http://www.gnu.org/licenses/>. 00029 // 00030 // Contact information: 00031 // Quantum Leaps Web sites: http://www.quantum-leaps.com 00032 // http://www.state-machine.com 00033 // e-mail: info@quantum-leaps.com 00035 #include "qs_pkg.h" 00036 00040 00041 QP_BEGIN_ 00042 00043 //............................................................................ 00044 void QS::f64(uint8_t const format, float64_t const d) { 00045 union F64Rep { 00046 float64_t d; 00047 struct UInt2 { 00048 uint32_t u1, u2; 00049 } i; 00050 } fu64; 00051 fu64.d = d; 00052 00053 QS_INSERT_ESC_BYTE(format) 00054 00055 QS_INSERT_ESC_BYTE(static_cast<uint8_t>(fu64.i.u1)) 00056 fu64.i.u1 >>= 8; 00057 QS_INSERT_ESC_BYTE(static_cast<uint8_t>(fu64.i.u1)) 00058 fu64.i.u1 >>= 8; 00059 QS_INSERT_ESC_BYTE(static_cast<uint8_t>(fu64.i.u1)) 00060 fu64.i.u1 >>= 8; 00061 QS_INSERT_ESC_BYTE(static_cast<uint8_t>(fu64.i.u1)) 00062 00063 QS_INSERT_ESC_BYTE(static_cast<uint8_t>(fu64.i.u2)) 00064 fu64.i.u2 >>= 8; 00065 QS_INSERT_ESC_BYTE(static_cast<uint8_t>(fu64.i.u2)) 00066 fu64.i.u2 >>= 8; 00067 QS_INSERT_ESC_BYTE(static_cast<uint8_t>(fu64.i.u2)) 00068 fu64.i.u2 >>= 8; 00069 QS_INSERT_ESC_BYTE(static_cast<uint8_t>(fu64.i.u2)) 00070 } 00071 00072 QP_END_
1.7.6.1