1// Other primitive such as size_t and ptrdiff_t 2 3/* 4 * C-type: size_t 5 * Scilab type: double or int32 6 */ 7 8%fragment(SWIG_AsVal_frag(size_t), "header", fragment="SWIG_Int_AsSize") { 9%#define SWIG_AsVal_size_t(scilabValue, valuePointer) SWIG_Int_AsSize(pvApiCtx, scilabValue, valuePointer, SWIG_Scilab_GetFuncName()) 10} 11%fragment("SWIG_Int_AsSize", "header", fragment=SWIG_AsVal_frag(int)) 12{ 13SWIGINTERN int 14SWIG_Int_AsSize(void *pvApiCtx, SwigSciObject iVar, size_t *piValue, char *fname) { 15 int iValue = 0; 16 if (SWIG_AsVal_dec(int)(iVar, &iValue) != SWIG_OK) 17 return SWIG_ERROR; 18 19 if (piValue) 20 *piValue = (size_t) iValue; 21 22 return SWIG_OK; 23} 24} 25 26%fragment(SWIG_From_frag(size_t), "header", fragment="SWIG_Int_FromSize") { 27%#define SWIG_From_size_t(scilabValue) SWIG_Int_FromSize(pvApiCtx, SWIG_Scilab_GetOutputPosition(), scilabValue, SWIG_Scilab_GetFuncName()) 28} 29%fragment("SWIG_Int_FromSize", "header", fragment=SWIG_From_frag(int)) 30{ 31SWIGINTERN int 32SWIG_Int_FromSize(void *pvApiCtx, int iVarOut, size_t iValue, char *fname) { 33 return SWIG_From_dec(int)((int)iValue); 34} 35} 36 37/* 38 * C-type: ptrdiff_t 39 * Scilab type: double or int32 40 */ 41 42%fragment(SWIG_AsVal_frag(ptrdiff_t), "header", fragment="SWIG_Int_AsPtrDiff") { 43%#define SWIG_AsVal_ptrdiff_t(scilabValue, valuePointer) SWIG_Int_AsPtrDiff(pvApiCtx, scilabValue, valuePointer, SWIG_Scilab_GetFuncName()) 44} 45%fragment("SWIG_Int_AsPtrDiff", "header", fragment=SWIG_AsVal_frag(int)) 46{ 47SWIGINTERN int 48SWIG_Int_AsPtrDiff(void *pvApiCtx, SwigSciObject iVar, ptrdiff_t *piValue, char *fname) { 49 int iValue = 0; 50 if (SWIG_AsVal_dec(int)(iVar, &iValue) != SWIG_OK) 51 return SWIG_ERROR; 52 53 if (piValue) 54 *piValue = (ptrdiff_t) iValue; 55 56 return SWIG_OK; 57} 58} 59 60%fragment(SWIG_From_frag(ptrdiff_t), "header", fragment="SWIG_Int_FromPtrDiff") { 61%#define SWIG_From_ptrdiff_t(scilabValue) SWIG_Int_FromPtrDiff(pvApiCtx, SWIG_Scilab_GetOutputPosition(), scilabValue, SWIG_Scilab_GetFuncName()) 62} 63%fragment("SWIG_Int_FromPtrDiff", "header", fragment=SWIG_From_frag(int)) { 64SWIGINTERN int 65SWIG_Int_FromPtrDiff(void *pvApiCtx, int iVarOut, ptrdiff_t iValue, char *fname) { 66 return SWIG_From_dec(int)((int)iValue); 67} 68} 69 70