MkBufferC_ToObject_lng.h File Reference

MkBufferC_ToObject_lng.h - 18 Feb 2025 - aotto1968. More...

Go to the source code of this file.

Macros
#define	MkBufferC_ToObject_helper(TT, TTT)

Functions
OT_ProcRet NS	MkBufferC_ToObject (MkBufferC_ARGS)

Detailed Description

MkBufferC_ToObject_lng.h - 18 Feb 2025 - aotto1968.

Copyright

(C) NHI - #1 - Project - Group This software has NO permission to copy, please contact AUTHOR for additional information

Version

4684148787fa5645445ef6586be6ebb79f4f1890

Date

Tue Feb 18 14:42:21 2025 +0100

Author

aotto1968 aotto.nosp@m.1968.nosp@m.@t-on.nosp@m.line.nosp@m..de

Definition in file MkBufferC_ToObject_lng.h.

Macro Definition Documentation

MkBufferC_ToObject_helper

#define MkBufferC_ToObject_helper	(		TT,
			TTT )

Value:

  case MK_##TT##T: {                                       \
    MK_##TTT val_out=0;                                    \
    MkErrorC_Check(hdl,MkBufferGet##TT (hdl, &val_out));   \
    OT_retObj_SET_##TTT(val_out)                           \
    break;                                                 \
  }                                                        \

Definition at line 13 of file MkBufferC_ToObject_lng.h.

#define MkBufferC_ToObject_helper(TT,TTT)                  \
  case MK_##TT##T: {                                       \
    MK_##TTT val_out=0;                                    \
    MkErrorC_Check(hdl,MkBufferGet##TT (hdl, &val_out));   \
    OT_retObj_SET_##TTT(val_out)                           \
    break;                                                 \
  }                                                        \
 

Function Documentation

MkBufferC_ToObject()

OT_ProcRet NS MkBufferC_ToObject

(

MkBufferC_ARGS

)

Definition at line 21 of file MkBufferC_ToObject_lng.h.

                                                   {
  OT_SETUP_hdl
  OT_SETUP_NOARG(ToObject_doc)
  OT_CHECK_NOARGS
  switch (hdl->var.type) {
    MkBufferC_ToObject_helper(STR,STRN);
    MkBufferC_ToObject_helper(I32,I32);
    MkBufferC_ToObject_helper(DBL,DBL);
    MkBufferC_ToObject_helper(I64,I64);
    MkBufferC_ToObject_helper(I8,I8);
    MkBufferC_ToObject_helper(BOL,BOL);
    MkBufferC_ToObject_helper(I16,I16);
    MkBufferC_ToObject_helper(FLT,FLT);
    case MK_LSTT: {
      MK_BFL bfl = MkBufferListCreate(5);
      MkErrorC_Check(hdl,MkBufferGetBFL (hdl, &bfl));
      OT_MK_CALL_0(bfl,MkBufferListC,ToList,retObj);
      MkRefDecr_X(bfl);
      break;
    }
    case MK_BINT: {
      MkBinaryR val_out;
      MkErrorC_Check(hdl,MkBufferGetBIN(hdl, &val_out));
      OT_retObj_SET_BIN(val_out.data,val_out.size);
      break;
    }
  }
  goto end;
  error: MK_UNUSED
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}