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