exec("swigtest.start", -1); // bool checkequal(arr_bool([%T %F %F %T %F %T %T %T], 8), 5, "arr_bool"); // char checkequal(arr_char(["charptr"], 7), 756, "arr_char"); // signed char checkequal(arr_schar([1, 2, 3, 4], 4), 10, "arr_schar"); checkequal(arr_schar(int8([1, 2, 3, 4]), 4), 10, "arr_schar"); // unsigned char checkequal(arr_uchar([1, 2, 3, 4], 4), 10, "arr_uchar"); checkequal(arr_uchar(uint8([1, 2, 3, 4]), 4), 10, "arr_uchar"); // short checkequal(arr_short([1, 2, 3, 4], 4), 10, "arr_short"); checkequal(arr_short(int16([1, 2, 3, 4]), 4), 10, "arr_short"); // unsigned short checkequal(arr_ushort([1, 2, 3, 4], 4), 10, "arr_ushort"); checkequal(arr_ushort(uint16([1, 2, 3, 4]), 4), 10, "arr_ushort"); // int checkequal(arr_int([1, 2, 3, 4], 4), 10, "arr_int"); checkequal(arr_int(int32([1, 2, 3, 4]), 4), 10, "arr_int"); // unsigned int checkequal(arr_uint([1, 2, 3, 4], 4), 10, ""); checkequal(arr_uint(uint32([1, 2, 3, 4]), 4), 10, ""); // long checkequal(arr_long([1, 2, 3, 4], 4), 10, "arr_long"); checkequal(arr_long(int32([1, 2, 3, 4]), 4), 10, "arr_long"); // unsigned long checkequal(arr_ulong([1, 2, 3, 4], 4), 10, "arr_ulong"); checkequal(arr_ulong(uint32([1, 2, 3, 4]), 4), 10, "arr_ulong"); // long long // No equivalent in Scilab 5 // unsigned long long // No equivalent in Scilab 5 // float a = [1, 2, 3, 4]; checkequal(arr_float(a, 4), 10, "arr_float"); // double a = [1, 2, 3, 4]; checkequal(arr_double(a, 4), 10, "arr_double"); exec("swigtest.quit", -1);
Generated by dwww version 1.15 on Tue Jul 2 00:31:40 CEST 2024.