scienum.swg 1.1 KB

12345678910111213141516171819202122232425262728293031
  1. /*
  2. * C-type: enum
  3. * Scilab type: double or int32
  4. */
  5. %fragment(SWIG_AsVal_frag(Enum), "header", fragment="SWIG_Int_AsEnum") {
  6. %#define SWIG_AsVal_Enum(scilabValue, valuePointer) SWIG_Int_AsEnum(pvApiCtx, scilabValue, valuePointer, SWIG_Scilab_GetFuncName())
  7. }
  8. %fragment("SWIG_Int_AsEnum", "header", fragment="SWIG_SciDoubleOrInt32_AsInt") {
  9. SWIGINTERN int
  10. SWIG_Int_AsEnum(void *pvApiCtx, int iVar, int *enumValue, char *fname) {
  11. int iValue = 0;
  12. if (SWIG_SciDoubleOrInt32_AsInt(pvApiCtx, iVar, &iValue, fname) != SWIG_OK)
  13. return SWIG_ERROR;
  14. *enumValue = iValue;
  15. return SWIG_OK;
  16. }
  17. }
  18. %fragment(SWIG_From_frag(Enum), "header", fragment="SWIG_Int_FromEnum") {
  19. %#define SWIG_From_Enum(scilabValue) SWIG_Int_FromEnum(pvApiCtx, SWIG_Scilab_GetOutputPosition(), scilabValue, SWIG_Scilab_GetFuncName())
  20. }
  21. %fragment("SWIG_Int_FromEnum", "header", fragment="SWIG_SciDouble_FromInt") {
  22. SWIGINTERN int
  23. SWIG_Int_FromEnum(void *pvApiCtx, int iVarOut, int enumValue, char *fname) {
  24. if (SWIG_SciDouble_FromInt(pvApiCtx, iVarOut, enumValue, fname) != SWIG_OK)
  25. return SWIG_ERROR;
  26. SWIG_Scilab_SetOutput(pvApiCtx, iVarOut);
  27. return SWIG_OK;
  28. }
  29. }