*/
#ifdef ANSI
-PUBLIC S16 SPkS8
+S16 SPkS8
(
S8 val, /* value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SPkS8(val, mBuf)
+S16 SPkS8(val, mBuf)
S8 val; /* value */
Buffer *mBuf; /* message buffer */
#endif
{
S16 ret; /* return code */
- TRC1(SPkS8)
ret = SAddPreMsg((Data) val, mBuf);
#if (ERRCLASS & ERRCLS_ADD_RES)
if (ret != ROK)
*/
#ifdef ANSI
-PUBLIC S16 oduUnpackUInt8
+S16 oduUnpackUInt8
(
U8 val, /* value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 oduUnpackUInt8(val, mBuf)
+S16 oduUnpackUInt8(val, mBuf)
U8 val; /* value */
Buffer *mBuf; /* message buffer */
#endif
{
S16 ret; /* return code */
- TRC1(oduUnpackUInt8)
ret = SAddPreMsg((Data) val, mBuf);
#if (ERRCLASS & ERRCLS_ADD_RES)
if (ret != ROK)
*/
#ifdef ANSI
-PUBLIC S16 SPkS16
+S16 SPkS16
(
S16 val, /* value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SPkS16(val, mBuf)
+S16 SPkS16(val, mBuf)
S16 val; /* value */
Buffer *mBuf; /* message buffer */
#endif
Data pkArray[2]; /* array for packing */
S16 ret; /* return code */
- TRC1(SPkS16)
#ifndef FCSPKINT /* backward compatibility, packing order */
pkArray[0] = (Data) GetHiByte(val);
pkArray[1] = (Data) GetLoByte(val);
*/
#ifdef ANSI
-PUBLIC S16 oduUnpackUInt16
+S16 oduUnpackUInt16
(
U16 val, /* value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 oduUnpackUInt16(val, mBuf)
+S16 oduUnpackUInt16(val, mBuf)
U16 val; /* value */
Buffer *mBuf; /* message buffer */
#endif
Data pkArray[2]; /* array for packing */
S16 ret; /* return code */
- TRC1(oduUnpackUInt16)
#ifndef FCSPKINT /* backward compatibility, packing order */
pkArray[0] = (Data) GetHiByte(val);
pkArray[1] = (Data) GetLoByte(val);
*/
#ifdef ANSI
-PUBLIC S16 SPkS32
+S16 SPkS32
(
S32 val, /* value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SPkS32(val, mBuf)
+S16 SPkS32(val, mBuf)
S32 val; /* value */
Buffer *mBuf; /* message buffer */
#endif
Data pkArray[4]; /* packing array */
S16 ret; /* return code */
- TRC1(SPkS32)
#ifndef FCSPKINT /* backward compatibility, packing order */
tmp = (U16) GetHiWord(val);
pkArray[0] = (Data) GetHiByte(tmp);
*/
#ifdef ANSI
-PUBLIC S16 oduUnpackUInt32
+S16 oduUnpackUInt32
(
U32 val, /* value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 oduUnpackUInt32(val, mBuf)
+S16 oduUnpackUInt32(val, mBuf)
U32 val; /* value */
Buffer *mBuf; /* message buffer */
#endif
Data pkArray[4]; /* packing array */
S16 ret; /* return code */
- TRC1(oduUnpackUInt32)
#ifndef FCSPKINT /* backward compatibility, packing order */
tmp = (U16) GetHiWord(val);
pkArray[0] = (Data) GetHiByte(tmp);
*/
#ifdef ANSI
-PUBLIC S16 SPkF32
+S16 SPkF32
(
F32 val, /* value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SPkF32(val, mBuf)
+S16 SPkF32(val, mBuf)
F32 val; /* value */
Buffer *mBuf; /* message buffer */
#endif
S8 pkArray[15]; /* packing array */
#endif /*FCSPKINT*/
- TRC1(SPkF32)
-
sprintf(tmpArray, "%.7e", val);
#ifndef FCSPKINT /* backward compatibility, packing order */
*/
#ifdef ANSI
-PUBLIC S16 SPkF64
+S16 SPkF64
(
F64 val, /* value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SPkF64(val, mBuf)
+S16 SPkF64(val, mBuf)
F64 val; /* value */
Buffer *mBuf; /* message buffer */
#endif
S8 pkArray[25]; /* packing array */
#endif /*FCSPKINT*/
- TRC1(SPkF64)
-
sprintf(tmpArray, "%.16le", val);
#ifndef FCSPKINT /* backward compatibility, packing order */
*/
#ifdef ANSI
-PUBLIC S16 SUnpkS8
+S16 SUnpkS8
(
S8 *val, /* pointer to value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SUnpkS8(val, mBuf)
+S16 SUnpkS8(val, mBuf)
S8 *val; /* pointer to value */
Buffer *mBuf; /* message buffer */
#endif
{
Data tmp; /* temporary value */
S16 ret; /* return code */
- TRC1(SUnpkS8)
/* ss021.103 - Addition of data pointer check */
#if (ERRCLASS & ERRCLS_INT_PAR)
*/
#ifdef ANSI
-PUBLIC S16 oduPackUInt8
+S16 oduPackUInt8
(
U8 *val, /* pointer to value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 oduPackUInt8(val, mBuf)
+S16 oduPackUInt8(val, mBuf)
U8 *val; /* pointer to value */
Buffer *mBuf; /* message buffer */
#endif
{
Data tmp; /* temporary value */
S16 ret; /* return code */
- TRC1(oduPackUInt8)
/* ss021.103 - Addition of data pointer check */
#if (ERRCLASS & ERRCLS_INT_PAR)
*/
#ifdef ANSI
-PUBLIC S16 SUnpkS16
+S16 SUnpkS16
(
S16 *val, /* pointer to value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SUnpkS16(val, mBuf)
+S16 SUnpkS16(val, mBuf)
S16 *val; /* pointer to value */
Buffer *mBuf; /* message buffer */
#endif
U16 tmp16; /* temporary value */
Data unpkArray[2]; /* unpacking array */
S16 ret; /* return code */
- TRC1(SUnpkS16)
/* ss021.103 - Addition of data pointer check */
#if (ERRCLASS & ERRCLS_INT_PAR)
*/
#ifdef ANSI
-PUBLIC S16 oduPackUInt16
+S16 oduPackUInt16
(
U16 *val, /* pointer to value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 oduPackUInt16(val, mBuf)
+S16 oduPackUInt16(val, mBuf)
U16 *val; /* pointer to value */
Buffer *mBuf; /* message buffer */
#endif
U16 tmp16; /* temporary value */
Data unpkArray[2]; /* unpacking array */
S16 ret; /* return code */
- TRC1(oduPackUInt16)
/* ss021.103 - Addition of data pointer check */
#if (ERRCLASS & ERRCLS_INT_PAR)
*/
#ifdef ANSI
-PUBLIC S16 SUnpkS32
+S16 SUnpkS32
(
S32 *val, /* pointer to value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SUnpkS32(val, mBuf)
+S16 SUnpkS32(val, mBuf)
S32 *val; /* pointer to value */
Buffer *mBuf; /* message buffer */
#endif
U32 tmp32; /* temporary value */
Data unpkArray[4]; /* unpacking array */
S16 ret; /* return code */
- TRC1(SUnpkS32)
/* ss021.103 - Addition of data pointer check */
#if (ERRCLASS & ERRCLS_INT_PAR)
*/
#ifdef ANSI
-PUBLIC S16 oduPackUInt32
+S16 oduPackUInt32
(
U32 *val, /* pointer to value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 oduPackUInt32(val, mBuf)
+S16 oduPackUInt32(val, mBuf)
U32 *val; /* pointer to value */
Buffer *mBuf; /* message buffer */
#endif
#ifdef ERRCLASS
S16 ret; /* return code */
#endif /* ERRCLASS */
- TRC1(oduPackUInt32)
/* ss021.103 - Addition of data pointer check */
#if (ERRCLASS & ERRCLS_INT_PAR)
*/
#ifdef ANSI
-PUBLIC S16 SUnpkF32
+S16 SUnpkF32
(
F32 *val, /* pointer to value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SUnpkF32(val, mBuf)
+S16 SUnpkF32(val, mBuf)
F32 *val; /* pointer to value */
Buffer *mBuf; /* message buffer */
#endif
S8 unpkArray[15]; /* unpacking array */
#endif /* FCSPKINT */
- TRC1(SUnpkF32)
-
#if (ERRCLASS & ERRCLS_INT_PAR)
/* check data pointer */
if (!val)
*/
#ifdef ANSI
-PUBLIC S16 SUnpkF64
+S16 SUnpkF64
(
F64 *val, /* pointer to value */
Buffer *mBuf /* message buffer */
)
#else
-PUBLIC S16 SUnpkF64(val, mBuf)
+S16 SUnpkF64(val, mBuf)
F64 *val; /* pointer to value */
Buffer *mBuf; /* message buffer */
#endif
S8 unpkArray[25]; /* unpacking array */
#endif /* FCSPKINT */
- TRC1(SUnpkF64)
-
#if (ERRCLASS & ERRCLS_INT_PAR)
/* check data pointer */
if (!val)