19 template<
typename T>
class SwigValueWrapper {
20 struct SwigMovePointer {
22 SwigMovePointer(T *p) : ptr(p) { }
23 ~SwigMovePointer() {
delete ptr; }
24 SwigMovePointer& operator=(SwigMovePointer& rhs) { T* oldptr = ptr; ptr = 0;
delete oldptr; ptr = rhs.ptr; rhs.ptr = 0;
return *
this; }
26 SwigValueWrapper& operator=(
const SwigValueWrapper<T>& rhs);
27 SwigValueWrapper(
const SwigValueWrapper<T>& rhs);
29 SwigValueWrapper() : pointer(0) { }
30 SwigValueWrapper& operator=(
const T& t) { SwigMovePointer tmp(
new T(t)); pointer = tmp;
return *
this; }
31 operator T&()
const {
return *pointer.ptr; }
32 T *operator&() {
return pointer.ptr; }
35 template <
typename T> T SwigValueInit() {
46 #ifndef SWIGTEMPLATEDISAMBIGUATOR
47 # if defined(__SUNPRO_CC) && (__SUNPRO_CC <= 0x560)
48 # define SWIGTEMPLATEDISAMBIGUATOR template
49 # elif defined(__HP_aCC)
52 # define SWIGTEMPLATEDISAMBIGUATOR template
54 # define SWIGTEMPLATEDISAMBIGUATOR
60 # if defined(__cplusplus) || (defined(__GNUC__) && !defined(__STRICT_ANSI__))
61 # define SWIGINLINE inline
69 # if defined(__GNUC__)
70 # if !(defined(__cplusplus)) || (__GNUC__ > 3 || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4))
71 # define SWIGUNUSED __attribute__ ((__unused__))
76 # define SWIGUNUSED __attribute__ ((__unused__))
82 #ifndef SWIG_MSC_UNSUPPRESS_4505
83 # if defined(_MSC_VER)
84 # pragma warning(disable : 4505)
88 #ifndef SWIGUNUSEDPARM
90 # define SWIGUNUSEDPARM(p)
92 # define SWIGUNUSEDPARM(p) p SWIGUNUSED
98 # define SWIGINTERN static SWIGUNUSED
102 #ifndef SWIGINTERNINLINE
103 # define SWIGINTERNINLINE SWIGINTERN SWIGINLINE
107 #if defined(__GNUC__)
108 # if (__GNUC__ >= 4) || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4)
109 # ifndef GCC_HASCLASSVISIBILITY
110 # define GCC_HASCLASSVISIBILITY
116 # if defined(_WIN32) || defined(__WIN32__) || defined(__CYGWIN__)
117 # if defined(STATIC_LINKED)
120 # define SWIGEXPORT __declspec(dllexport)
123 # if defined(__GNUC__) && defined(GCC_HASCLASSVISIBILITY)
124 # define SWIGEXPORT __attribute__ ((visibility("default")))
133 # if defined(_WIN32) || defined(__WIN32__) || defined(__CYGWIN__)
134 # define SWIGSTDCALL __stdcall
141 #if !defined(SWIG_NO_CRT_SECURE_NO_DEPRECATE) && defined(_MSC_VER) && !defined(_CRT_SECURE_NO_DEPRECATE)
142 # define _CRT_SECURE_NO_DEPRECATE
146 #if !defined(SWIG_NO_SCL_SECURE_NO_DEPRECATE) && defined(_MSC_VER) && !defined(_SCL_SECURE_NO_DEPRECATE)
147 # define _SCL_SECURE_NO_DEPRECATE
151 #if defined(__APPLE__) && !defined(__ASSERT_MACROS_DEFINE_VERSIONS_WITHOUT_UNDERSCORES)
152 # define __ASSERT_MACROS_DEFINE_VERSIONS_WITHOUT_UNDERSCORES 0
160 #ifdef __INTEL_COMPILER
161 # pragma warning disable 592
181 #define SWIG_RUNTIME_VERSION "4"
184 #ifdef SWIG_TYPE_TABLE
185 # define SWIG_QUOTE_STRING(x) #x
186 # define SWIG_EXPAND_AND_QUOTE_STRING(x) SWIG_QUOTE_STRING(x)
187 # define SWIG_TYPE_TABLE_NAME SWIG_EXPAND_AND_QUOTE_STRING(SWIG_TYPE_TABLE)
189 # define SWIG_TYPE_TABLE_NAME
202 # define SWIGRUNTIME SWIGINTERN
205 #ifndef SWIGRUNTIMEINLINE
206 # define SWIGRUNTIMEINLINE SWIGRUNTIME SWIGINLINE
210 #ifndef SWIG_BUFFER_SIZE
211 # define SWIG_BUFFER_SIZE 1024
215 #define SWIG_POINTER_DISOWN 0x1
216 #define SWIG_CAST_NEW_MEMORY 0x2
217 #define SWIG_POINTER_NO_NULL 0x4
220 #define SWIG_POINTER_OWN 0x1
303 #define SWIG_ERROR (-1)
304 #define SWIG_IsOK(r) (r >= 0)
305 #define SWIG_ArgError(r) ((r != SWIG_ERROR) ? r : SWIG_TypeError)
308 #define SWIG_CASTRANKLIMIT (1 << 8)
310 #define SWIG_NEWOBJMASK (SWIG_CASTRANKLIMIT << 1)
312 #define SWIG_TMPOBJMASK (SWIG_NEWOBJMASK << 1)
314 #define SWIG_BADOBJ (SWIG_ERROR)
315 #define SWIG_OLDOBJ (SWIG_OK)
316 #define SWIG_NEWOBJ (SWIG_OK | SWIG_NEWOBJMASK)
317 #define SWIG_TMPOBJ (SWIG_OK | SWIG_TMPOBJMASK)
319 #define SWIG_AddNewMask(r) (SWIG_IsOK(r) ? (r | SWIG_NEWOBJMASK) : r)
320 #define SWIG_DelNewMask(r) (SWIG_IsOK(r) ? (r & ~SWIG_NEWOBJMASK) : r)
321 #define SWIG_IsNewObj(r) (SWIG_IsOK(r) && (r & SWIG_NEWOBJMASK))
322 #define SWIG_AddTmpMask(r) (SWIG_IsOK(r) ? (r | SWIG_TMPOBJMASK) : r)
323 #define SWIG_DelTmpMask(r) (SWIG_IsOK(r) ? (r & ~SWIG_TMPOBJMASK) : r)
324 #define SWIG_IsTmpObj(r) (SWIG_IsOK(r) && (r & SWIG_TMPOBJMASK))
327 #if defined(SWIG_CASTRANK_MODE)
328 # ifndef SWIG_TypeRank
329 # define SWIG_TypeRank unsigned long
331 # ifndef SWIG_MAXCASTRANK
332 # define SWIG_MAXCASTRANK (2)
334 # define SWIG_CASTRANKMASK ((SWIG_CASTRANKLIMIT) -1)
335 # define SWIG_CastRank(r) (r & SWIG_CASTRANKMASK)
340 return SWIG_IsOK(r) ? SWIG_CastRank(r) + 1 : 0;
343 # define SWIG_AddCast(r) (r)
344 # define SWIG_CheckState(r) (SWIG_IsOK(r) ? 1 : 0)
354 typedef void *(*swig_converter_func)(
void *,
int *);
396 const char *f2,
const char *l2) {
397 for (;(f1 != l1) && (f2 != l2); ++f1, ++f2) {
398 while ((*f1 ==
' ') && (f1 != l1)) ++f1;
399 while ((*f2 ==
' ') && (f2 != l2)) ++f2;
400 if (*f1 != *f2)
return (*f1 > *f2) ? 1 : -1;
402 return (
int)((l1 - f1) - (l2 - f2));
412 const char* te = tb + strlen(tb);
414 while (equiv != 0 && *ne) {
415 for (nb = ne; *ne; ++ne) {
416 if (*ne ==
'|')
break;
441 if (strcmp(iter->
type->
name, c) == 0) {
442 if (iter == ty->
cast)
468 if (iter->
type == from) {
469 if (iter == ty->
cast)
501 if (!ty || !ty->
dcast)
return ty;
502 while (ty && (ty->
dcast)) {
503 ty = (*ty->
dcast)(ptr);
527 if (!type)
return NULL;
528 if (type->
str != NULL) {
529 const char *last_name = type->
str;
531 for (s = type->
str; *s; s++)
532 if (*s ==
'|') last_name = s+1;
580 size_t r = iter->
size - 1;
583 size_t i = (l + r) >> 1;
584 const char *iname = iter->
types[i]->
name;
586 int compare = strcmp(
name, iname);
588 return iter->
types[i];
589 }
else if (compare < 0) {
595 }
else if (compare > 0) {
604 }
while (iter != end);
631 for (; i < iter->
size; ++i) {
633 return iter->
types[i];
636 }
while (iter != end);
648 static const char hex[17] =
"0123456789abcdef";
649 const unsigned char *u = (
unsigned char *) ptr;
650 const unsigned char *eu = u + sz;
651 for (; u != eu; ++u) {
652 unsigned char uu = *u;
653 *(c++) = hex[(uu & 0xf0) >> 4];
654 *(c++) = hex[uu & 0xf];
664 unsigned char *u = (
unsigned char *) ptr;
665 const unsigned char *eu = u + sz;
666 for (; u != eu; ++u) {
669 if ((d >=
'0') && (d <=
'9'))
670 uu = (
unsigned char)((d -
'0') << 4);
671 else if ((d >=
'a') && (d <=
'f'))
672 uu = (
unsigned char)((d - (
'a'-10)) << 4);
676 if ((d >=
'0') && (d <=
'9'))
677 uu |= (
unsigned char)(d -
'0');
678 else if ((d >=
'a') && (d <=
'f'))
679 uu |= (
unsigned char)(d - (
'a'-10));
693 if ((2*
sizeof(
void *) + 2) > bsz)
return 0;
696 if (strlen(
name) + 1 > (bsz - (r - buff)))
return 0;
704 if (strcmp(c,
"NULL") == 0) {
717 size_t lname = (
name ? strlen(
name) : 0);
718 if ((2*sz + 2 + lname) > bsz)
return 0;
722 strncpy(r,
name,lname+1);
732 if (strcmp(c,
"NULL") == 0) {
747 #define SWIG_UnknownError -1
748 #define SWIG_IOError -2
749 #define SWIG_RuntimeError -3
750 #define SWIG_IndexError -4
751 #define SWIG_TypeError -5
752 #define SWIG_DivisionByZero -6
753 #define SWIG_OverflowError -7
754 #define SWIG_SyntaxError -8
755 #define SWIG_ValueError -9
756 #define SWIG_SystemError -10
757 #define SWIG_AttributeError -11
758 #define SWIG_MemoryError -12
759 #define SWIG_NullReferenceError -13
769 const char* type = 0;
772 type =
"MemoryError";
778 type =
"RuntimeError";
787 type =
"ZeroDivisionError";
790 type =
"OverflowError";
793 type =
"SyntaxError";
799 type =
"SystemError";
802 type =
"AttributeError";
805 type =
"RuntimeError";
814 Tcl_ResetResult(interp);
815 Tcl_SetObjResult(interp, obj);
816 Tcl_SetErrorCode(interp,
"SWIG", ctype, NULL);
822 Tcl_ResetResult(interp);
823 Tcl_SetErrorCode(interp,
"SWIG", ctype, NULL);
824 Tcl_AppendResult(interp, ctype,
" ", mesg, NULL);
835 Tcl_AddErrorInfo(interp, mesg);
852 #define SWIG_TCL_POINTER 4
853 #define SWIG_TCL_BINARY 5
865 typedef int (*
swig_wrapper)(ClientData, Tcl_Interp *, int, Tcl_Obj *CONST []);
867 typedef char *(*swig_variable_func)(ClientData, Tcl_Interp *,
char *,
char *, int);
905 int (*wrapper)(ClientData, Tcl_Interp *, int, Tcl_Obj *CONST []);
906 ClientData clientdata;
913 char * (*get)(ClientData, Tcl_Interp *,
char *,
char *, int);
914 char * (*set)(ClientData, Tcl_Interp *,
char *,
char *, int);
928 Tcl_ObjSetVar2(interp,Tcl_NewStringObj(
name,-1), NULL, obj, TCL_GLOBAL_ONLY);
929 Tcl_SetHashValue(Tcl_CreateHashEntry(&
swigconstTable,
name, &newobj), (ClientData) obj);
934 Tcl_HashEntry *entryPtr;
938 return (Tcl_Obj *) Tcl_GetHashValue(entryPtr);
959 #define SWIG_ConvertPtr(oc, ptr, ty, flags) SWIG_Tcl_ConvertPtr(interp, oc, ptr, ty, flags)
960 #define SWIG_NewPointerObj(ptr, type, flags) SWIG_Tcl_NewPointerObj(ptr, type, flags)
963 #define SWIG_ConvertPacked(obj, ptr, sz, ty) SWIG_Tcl_ConvertPacked(interp, obj, ptr, sz, ty)
964 #define SWIG_NewPackedObj(ptr, sz, type) SWIG_Tcl_NewPackedObj(ptr, sz, type)
967 #define SWIG_ConvertInstance(obj, pptr, type, flags) SWIG_Tcl_ConvertPtr(interp, obj, pptr, type, flags)
968 #define SWIG_NewInstanceObj(thisvalue, type, flags) SWIG_Tcl_NewInstanceObj(interp, thisvalue, type, flags)
971 #define SWIG_ConvertFunctionPtr(obj, pptr, type) SWIG_Tcl_ConvertPtr(interp, obj, pptr, type, 0)
972 #define SWIG_NewFunctionPtrObj(ptr, type) SWIG_Tcl_NewPointerObj(ptr, type, 0)
975 #define SWIG_ConvertMember(obj, ptr, sz, ty) SWIG_Tcl_ConvertPacked(interp,obj, ptr, sz, ty)
976 #define SWIG_NewMemberObj(ptr, sz, type) SWIG_Tcl_NewPackedObj(ptr, sz, type)
981 #define SWIG_GetModule(clientdata) SWIG_Tcl_GetModule((Tcl_Interp *) (clientdata))
982 #define SWIG_SetModule(clientdata, pointer) SWIG_Tcl_SetModule((Tcl_Interp *) (clientdata), pointer)
987 #define SWIG_ErrorType(code) SWIG_Tcl_ErrorType(code)
988 #define SWIG_Error(code, msg) SWIG_Tcl_SetErrorMsg(interp, SWIG_Tcl_ErrorType(code), msg)
989 #define SWIG_fail goto fail
994 #define SWIG_Acquire(ptr) SWIG_Tcl_Acquire(ptr)
995 #define SWIG_MethodCommand SWIG_Tcl_MethodCommand
996 #define SWIG_Disown(ptr) SWIG_Tcl_Disown(ptr)
997 #define SWIG_ConvertPtrFromString(c, ptr, ty, flags) SWIG_Tcl_ConvertPtrFromString(interp, c, ptr, ty, flags)
998 #define SWIG_MakePtr(c, ptr, ty, flags) SWIG_Tcl_MakePtr(c, ptr, ty, flags)
999 #define SWIG_PointerTypeFromString(c) SWIG_Tcl_PointerTypeFromString(c)
1000 #define SWIG_GetArgs SWIG_Tcl_GetArgs
1001 #define SWIG_GetConstantObj(key) SWIG_Tcl_GetConstantObj(key)
1002 #define SWIG_ObjectConstructor SWIG_Tcl_ObjectConstructor
1003 #define SWIG_Thisown(ptr) SWIG_Tcl_Thisown(ptr)
1004 #define SWIG_ObjectDelete SWIG_Tcl_ObjectDelete
1007 #define SWIG_TCL_DECL_ARGS_2(arg1, arg2) (Tcl_Interp *interp SWIGUNUSED, arg1, arg2)
1008 #define SWIG_TCL_CALL_ARGS_2(arg1, arg2) (interp, arg1, arg2)
1014 #define SWIG_POINTER_EXCEPTION 0
1015 #define SWIG_GetConstant SWIG_GetConstantObj
1016 #define SWIG_Tcl_GetConstant SWIG_Tcl_GetConstantObj
1018 #if TCL_MAJOR_VERSION >= 8 && TCL_MINOR_VERSION >= 5
1019 #define SWIG_TCL_HASHTABLE_INIT {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
1021 #define SWIG_TCL_HASHTABLE_INIT {0}
1034 static Tcl_HashTable swigobjectTable;
1035 static int swigobjectTableinit = 0;
1036 if (!swigobjectTableinit) {
1037 Tcl_InitHashTable(&swigobjectTable, TCL_ONE_WORD_KEYS);
1038 swigobjectTableinit = 1;
1040 return &swigobjectTable;
1063 Tcl_DeleteHashEntry(entryPtr);
1076 if (strcmp(c,
"NULL") == 0)
1086 if (Tcl_VarEval(interp,
"info commands ", c, (
char *) NULL) == TCL_OK) {
1087 Tcl_Obj *result = Tcl_GetObjResult(interp);
1088 if (*(Tcl_GetStringFromObj(result, NULL)) == 0) {
1090 Tcl_ResetResult(interp);
1096 Tcl_ResetResult(interp);
1101 if (Tcl_VarEval(interp,c,
" cget -this", (
char *) NULL) != TCL_OK) {
1102 Tcl_ResetResult(interp);
1106 c = Tcl_GetStringFromObj(Tcl_GetObjResult(interp), NULL);
1145 if (!(((d >=
'0') && (d <=
'9')) || ((d >=
'a') && (d <=
'f'))))
break;
1157 if (!obj)
goto type_error;
1158 c = Tcl_GetStringFromObj(obj,NULL);
1160 if (*c !=
'_')
goto type_error;
1165 if (!tc)
goto type_error;
1193 robj = Tcl_NewStringObj(result,-1);
1201 if ((2*sz + 1 + strlen(type->
name)) > 1000)
return 0;
1204 strcpy(r,type->
name);
1205 return Tcl_NewStringObj(result,-1);
1251 Tcl_DecrRefCount(si->
thisptr);
1258 char *method, *attrname;
1267 int cls_stack_bi[64];
1268 int cls_stack_top = 0;
1272 objv = (Tcl_Obj **) _objv;
1274 Tcl_SetResult(interp, (
char *)
"wrong # args.", TCL_STATIC);
1277 method = Tcl_GetStringFromObj(objv[1],NULL);
1278 if (strcmp(method,
"-acquire") == 0) {
1283 if (strcmp(method,
"-disown") == 0) {
1290 if (strcmp(method,
"-delete") == 0) {
1291 Tcl_DeleteCommandFromToken(interp,inst->
cmdtok);
1294 cls_stack[cls_stack_top] = inst->
classptr;
1295 cls_stack_bi[cls_stack_top] = -1;
1297 Tcl_HashEntry* hashentry;
1298 bi = cls_stack_bi[cls_stack_top];
1299 cls = cls_stack[cls_stack_top];
1306 cls = cls->
bases[bi];
1308 cls_stack_bi[cls_stack_top]++;
1310 cls_stack[cls_stack_top] = cls;
1311 cls_stack_bi[cls_stack_top] = -1;
1317 if (cls_stack_top < 0)
break;
1320 cls_stack_bi[cls_stack_top]++;
1322 hashentry = Tcl_FindHashEntry(&(cls->
hashtable), method);
1324 ClientData cd = Tcl_GetHashValue(hashentry);
1328 Tcl_IncrRefCount(inst->
thisptr);
1329 rcode = (method_wrapper)(clientData,interp,objc,objv);
1331 Tcl_DecrRefCount(inst->
thisptr);
1335 if (strcmp(method,
"cget") == 0) {
1337 Tcl_SetResult(interp, (
char *)
"wrong # args.", TCL_STATIC);
1340 attrname = Tcl_GetStringFromObj(objv[2],NULL);
1342 while (attr && attr->
name) {
1343 if ((strcmp(attr->
name, attrname) == 0) && (attr->
getmethod)) {
1346 Tcl_IncrRefCount(inst->
thisptr);
1347 rcode = (*attr->
getmethod)(clientData,interp,2, objv);
1349 Tcl_DecrRefCount(inst->
thisptr);
1354 if (strcmp(attrname,
"-this") == 0) {
1355 Tcl_SetObjResult(interp, Tcl_DuplicateObj(inst->
thisptr));
1358 if (strcmp(attrname,
"-thisown") == 0) {
1360 Tcl_SetResult(interp,(
char*)
"1",TCL_STATIC);
1362 Tcl_SetResult(interp,(
char*)
"0",TCL_STATIC);
1366 }
else if (strcmp(method,
"configure") == 0) {
1369 Tcl_SetResult(interp, (
char *)
"wrong # args.", TCL_STATIC);
1374 attrname = Tcl_GetStringFromObj(objv[i],NULL);
1376 while (attr && attr->
name) {
1377 if ((strcmp(attr->
name, attrname) == 0) && (attr->
setmethod)) {
1380 Tcl_IncrRefCount(inst->
thisptr);
1381 rcode = (*attr->
setmethod)(clientData,interp,3, &objv[i-1]);
1383 Tcl_DecrRefCount(inst->
thisptr);
1384 if (rcode != TCL_OK)
return rcode;
1393 if (strcmp(method,
"configure") == 0) {
1394 if (numconf >= objc) {
1397 Tcl_SetResult(interp,(
char *)
"Invalid attribute name.", TCL_STATIC);
1401 if (strcmp(method,
"cget") == 0) {
1402 Tcl_SetResult(interp,(
char *)
"Invalid attribute name.", TCL_STATIC);
1405 Tcl_SetResult(interp, (
char *)
"Invalid method. Must be one of: configure cget -acquire -disown -delete", TCL_STATIC);
1410 while (meth && meth->
name) {
1411 char *cr = (
char *) Tcl_GetStringResult(interp);
1412 size_t meth_len = strlen(meth->
name);
1413 char* where = strchr(cr,
':');
1415 where = strstr(where, meth->
name);
1417 if(where[-1] ==
' ' && (where[meth_len] ==
' ' || where[meth_len]==0)) {
1426 Tcl_AppendElement(interp, (
char *) meth->
name);
1439 if (thisvalue && (type->
clientdata) && (interp)) {
1442 name = Tcl_GetStringFromObj(robj,NULL);
1443 if (!Tcl_GetCommandInfo(interp,
name, &ci) || (flags)) {
1445 newinst->
thisptr = Tcl_DuplicateObj(robj);
1446 Tcl_IncrRefCount(newinst->
thisptr);
1462 Tcl_Obj *newObj = 0;
1463 void *thisvalue = 0;
1473 Tcl_SetResult(interp, (
char *)
"swig: internal runtime error. No class object defined.", TCL_STATIC);
1478 char *s = Tcl_GetStringFromObj(objv[1],NULL);
1479 if (strcmp(s,
"-this") == 0) {
1482 }
else if (strcmp(s,
"-args") == 0) {
1484 }
else if (objc == 2) {
1487 }
else if (objc >= 3) {
1490 s1 = Tcl_GetStringFromObj(objv[2],NULL);
1491 if (strcmp(s1,
"-this") == 0) {
1501 result = (*cons)(0, interp, objc-firstarg, &objv[firstarg]);
1502 if (result != TCL_OK) {
1505 newObj = Tcl_DuplicateObj(Tcl_GetObjResult(interp));
1506 if (!
name)
name = Tcl_GetStringFromObj(newObj,NULL);
1507 }
else if (thisarg > 0) {
1508 if (thisarg < objc) {
1510 newObj = Tcl_DuplicateObj(objv[thisarg]);
1511 if (!
name)
name = Tcl_GetStringFromObj(newObj,NULL);
1513 Tcl_SetResult(interp, (
char *)
"wrong # args.", TCL_STATIC);
1517 Tcl_SetResult(interp, (
char *)
"No constructor available.", TCL_STATIC);
1521 Tcl_DecrRefCount(newObj);
1526 Tcl_IncrRefCount(newObj);
1542 int argno = 0, opt = 0;
1552 for (c = fmt; (*c && (*c !=
':') && (*c !=
';')); c++,argno++) {
1557 if (argno >= (objc-1)) {
1559 Tcl_SetResult(interp, (
char *)
"Wrong number of arguments ", TCL_STATIC);
1567 vptr = va_arg(ap,
void *);
1571 if (!obj) obj = objv[argno+1];
1573 obj = objv[argno+1];
1580 if (Tcl_GetLongFromObj(interp,obj,&tempi) != TCL_OK)
goto argerror;
1581 if ((*c ==
'i') || (*c ==
'I')) *((
int *)vptr) = (int)tempi;
1582 else if ((*c ==
'l') || (*c ==
'L')) *((
long *)vptr) = (long)tempi;
1583 else if ((*c ==
'h') || (*c ==
'H')) *((
short*)vptr) = (short)tempi;
1584 else if ((*c ==
'b') || (*c ==
'B')) *((
unsigned char *)vptr) = (
unsigned char)tempi;
1588 if (Tcl_GetDoubleFromObj(interp,obj,&tempd) != TCL_OK)
goto argerror;
1589 if ((*c ==
'f') || (*c ==
'F')) *((
float *) vptr) = (float)tempd;
1590 else if ((*c ==
'd') || (*c ==
'D')) *((
double*) vptr) = tempd;
1593 if (*(c+1) ==
'#') {
1594 int *vlptr = (
int *) va_arg(ap,
void *);
1595 *((
char **) vptr) = Tcl_GetStringFromObj(obj, vlptr);
1598 *((
char **)vptr) = Tcl_GetStringFromObj(obj,NULL);
1602 *((
char *)vptr) = *(Tcl_GetStringFromObj(obj,NULL));
1609 *((Tcl_Obj **)vptr) = objv[argno+1];
1617 if ((*c !=
';') && ((objc-1) > argno)) {
1618 Tcl_SetResult(interp, (
char *)
"Wrong # args.", TCL_STATIC);
1627 sprintf(temp,
"%d", argno+1);
1628 c = strchr(fmt,
':');
1629 if (!c) c = strchr(fmt,
';');
1630 if (!c) c = (
char *)
"";
1631 Tcl_AppendResult(interp,c,
" argument ", temp, NULL);
1643 #define SWIG_exception_fail(code, msg) do { SWIG_Error(code, msg); SWIG_fail; } while(0)
1645 #define SWIG_contract_assert(expr, msg) if (!(expr)) { SWIG_Error(SWIG_RuntimeError, msg); SWIG_fail; } else
1651 #define SWIGTYPE_p_a_base swig_types[0]
1652 #define SWIGTYPE_p_a_point swig_types[1]
1653 #define SWIGTYPE_p_a_shape swig_types[2]
1654 #define SWIGTYPE_p_a_shape_circle swig_types[3]
1655 #define SWIGTYPE_p_a_shape_cylinder swig_types[4]
1656 #define SWIGTYPE_p_a_shape_line swig_types[5]
1657 #define SWIGTYPE_p_a_shape_plane swig_types[6]
1658 #define SWIGTYPE_p_a_shape_quadric swig_types[7]
1659 #define SWIGTYPE_p_a_shape_sphere swig_types[8]
1660 #define SWIGTYPE_p_char swig_types[9]
1661 #define SWIGTYPE_p_std__vectorT_a_point_t swig_types[10]
1662 #define SWIGTYPE_p_vnl_vectorT_double_t swig_types[11]
1665 #define SWIG_TypeQuery(name) SWIG_TypeQueryModule(&swig_module, &swig_module, name)
1666 #define SWIG_MangledTypeQuery(name) SWIG_MangledTypeQueryModule(&swig_module, &swig_module, name)
1670 #define SWIG_init A_shape_Init
1671 #define SWIG_name "a_shape"
1672 #define SWIG_prefix ""
1673 #define SWIG_version "0.0"
1675 #define SWIGVERSION 0x040002
1676 #define SWIG_VERSION SWIGVERSION
1679 #define SWIG_as_voidptr(a) const_cast< void * >(static_cast< const void * >(a))
1680 #define SWIG_as_voidptrptr(a) ((void)SWIG_as_voidptr(*a),reinterpret_cast< void** >(a))
1683 #include <stdexcept>
1702 #ifndef SWIG_TCL_STUBS_VERSION
1703 #define SWIG_TCL_STUBS_VERSION "8.1"
1717 #if !defined(SWIG_NO_LLONG_MAX)
1718 # if !defined(LLONG_MAX) && defined(__GNUC__) && defined (__LONG_LONG_MAX__)
1719 # define LLONG_MAX __LONG_LONG_MAX__
1720 # define LLONG_MIN (-LLONG_MAX - 1LL)
1721 # define ULLONG_MAX (LLONG_MAX * 2ULL + 1ULL)
1729 return (size < INT_MAX) ? Tcl_NewStringObj(carray,
static_cast< int >(size)) : NULL;
1744 if (Tcl_GetDoubleFromObj(0, obj, &
v) == TCL_OK) {
1752 #define SWIG_From_double Tcl_NewDoubleObj
1755 std::ostringstream out;
1766 if (((
long) INT_MIN <= value) && (value <= (
long) INT_MAX)) {
1767 return Tcl_NewIntObj(
static_cast< int >(value));
1769 return Tcl_NewLongObj(value);
1775 #if (defined(_MSC_VER) && (_MSC_VER < 1900)) || defined(__BORLANDC__) || defined(_WATCOM)
1777 # define snprintf _snprintf
1785 if (value < (
unsigned long) LONG_MAX) {
1789 sprintf(temp,
"%lu", value);
1790 return Tcl_NewStringObj(temp,-1);
1813 if (Tcl_GetLongFromObj(0,obj, &
v) == TCL_OK) {
1814 if (val) *val = (long)
v;
1827 if ((v < INT_MIN || v > INT_MAX)) {
1830 if (val) *val =
static_cast< int >(
v);
1846 if ((v < SHRT_MIN || v > SHRT_MAX)) {
1849 if (val) *val =
static_cast< short >(
v);
1859 if (Tcl_GetLongFromObj(0,obj, &
v) == TCL_OK) {
1861 if (val) *val = (
unsigned long)
v;
1870 const char *nptr = Tcl_GetStringFromObj(obj, &len);
1871 if (nptr && len > 0) {
1876 v = strtoul(nptr, &endptr,0);
1877 if (nptr[0] ==
'\0' || *endptr !=
'\0')
1879 if (
v == ULONG_MAX && errno == ERANGE) {
1883 if (*endptr ==
'\0') {
1901 if ((
v > UINT_MAX)) {
1904 if (val) *val =
static_cast< unsigned int >(
v);
1944 arg1 =
reinterpret_cast< a_base *
>(argp1);
1945 result = (arg1)->classname();
1958 result = a_base::help();
1975 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_base_small self tol ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
1980 arg1 =
reinterpret_cast< a_base *
>(argp1);
1985 arg2 =
static_cast< double >(val2);
1986 (arg1)->small(arg2);
2006 arg1 =
reinterpret_cast< a_base *
>(argp1);
2007 result = (double)((
a_base const *)arg1)->small();
2017 Tcl_Obj *CONST *argv = objv+1;
2044 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_base_small'.\n"
2045 " Possible C/C++ prototypes are:\n"
2046 " a_base::small(double)\n"
2047 " a_base::small() const\n", TCL_STATIC);
2064 arg1 =
reinterpret_cast< a_base *
>(argp1);
2097 arg1 =
reinterpret_cast< a_base *
>(argp1);
2134 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2165 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_P self P ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2170 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2175 arg2 =
static_cast< double >(val2);
2196 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2197 result = (double)((
a_shape const *)arg1)->P();
2207 Tcl_Obj *CONST *argv = objv+1;
2234 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_P'.\n"
2235 " Possible C/C++ prototypes are:\n"
2236 " a_shape::P(double const)\n"
2237 " a_shape::P() const\n", TCL_STATIC);
2247 unsigned int result;
2254 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2255 result = (
unsigned int)((
a_shape const *)arg1)->npara();
2273 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_closest_point self p ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2278 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2287 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
2290 result = ((
a_shape const *)arg1)->closest_point(arg2);
2308 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_dist_point self pt ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2313 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2322 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
2325 result = (double)(arg1)->dist_point(arg2);
2336 std::vector< a_point > *arg2 = 0 ;
2343 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_dist_cloud self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2348 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2354 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_dist_cloud" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
2356 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
2357 result = (double)(arg1)->dist_cloud((std::vector< a_point >
const &)*arg2);
2368 std::vector< a_point > *arg2 = 0 ;
2375 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_average_dist_cloud self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2380 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2386 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_average_dist_cloud" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
2388 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
2389 result = (double)(arg1)->average_dist_cloud((std::vector< a_point >
const &)*arg2);
2400 std::vector< a_point > *arg2 = 0 ;
2407 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_rms_dist_cloud self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2412 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2418 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_rms_dist_cloud" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
2420 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
2421 result = (double)(arg1)->rms_dist_cloud((std::vector< a_point >
const &)*arg2);
2432 std::vector< a_point > *arg2 = 0 ;
2433 std::vector< a_point > *arg3 = 0 ;
2442 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_threshold_cloud self pts pts2 ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2447 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2453 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_threshold_cloud" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
2455 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
2461 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_threshold_cloud" "', argument " "3"" of type '" "std::vector< a_point > &""'");
2463 arg3 =
reinterpret_cast< std::vector< a_point > *
>(argp3);
2464 result = (int)(arg1)->threshold_cloud((std::vector< a_point >
const &)*arg2,*arg3);
2465 Tcl_SetObjResult(interp,
SWIG_From_int(
static_cast< int >(result)));
2475 std::vector< a_point > *arg2 = 0 ;
2476 std::vector< a_point > *arg3 = 0 ;
2485 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_best_fitting_cloud self pts pts2 ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2490 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2496 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_best_fitting_cloud" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
2498 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
2504 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_best_fitting_cloud" "', argument " "3"" of type '" "std::vector< a_point > &""'");
2506 arg3 =
reinterpret_cast< std::vector< a_point > *
>(argp3);
2507 result = (int)(arg1)->best_fitting_cloud((std::vector< a_point >
const &)*arg2,*arg3);
2508 Tcl_SetObjResult(interp,
SWIG_From_int(
static_cast< int >(result)));
2518 std::vector< a_point > *arg2 = 0 ;
2524 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_fit_cloud self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2529 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2537 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
2538 (arg1)->fit_cloud(*arg2);
2551 vnl_vector< double > result;
2553 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_getparameters self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
2558 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2579 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_para self i val ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2584 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2589 arg2 =
static_cast< int >(val2);
2594 arg3 =
static_cast< double >(val3);
2595 (arg1)->para(arg2,arg3);
2614 arg1 =
reinterpret_cast< a_shape *
>(argp1);
2685 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_circle_closest_point self p ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2699 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
2720 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_circle_dist_point self p ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2734 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
2737 result = (double)((
a_shape_circle const *)arg1)->dist_point(arg2);
2760 if (
SWIG_GetArgs(interp, objc, objv,
"oooo:a_shape_circle_p3pts self p1 p2 p3 ",(
void *)0,(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2774 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
2785 arg3 = *(
reinterpret_cast< a_point *
>(argp3));
2796 arg4 = *(
reinterpret_cast< a_point *
>(argp4));
2799 (arg1)->p3pts(arg2,arg3,arg4);
2814 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_circle_dir self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
2835 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_circle_orig self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
2856 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_circle_radius self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
2879 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_circle_dir self pt ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2893 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
2906 Tcl_Obj *CONST *argv = objv+1;
2932 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_circle_dir'.\n"
2933 " Possible C/C++ prototypes are:\n"
2934 " a_shape_circle::dir() const\n"
2935 " a_shape_circle::dir(a_point const)\n", TCL_STATIC);
2949 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_circle_orig self pt ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
2963 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
2976 Tcl_Obj *CONST *argv = objv+1;
3002 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_circle_orig'.\n"
3003 " Possible C/C++ prototypes are:\n"
3004 " a_shape_circle::orig() const\n"
3005 " a_shape_circle::orig(a_point const)\n", TCL_STATIC);
3019 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_circle_radius self r ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3029 arg2 =
static_cast< double >(val2);
3030 (arg1)->radius(arg2);
3040 Tcl_Obj *CONST *argv = objv+1;
3067 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_circle_radius'.\n"
3068 " Possible C/C++ prototypes are:\n"
3069 " a_shape_circle::radius() const\n"
3070 " a_shape_circle::radius(double)\n", TCL_STATIC);
3078 std::vector< a_point > *arg2 = 0 ;
3084 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_circle_random_hint self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3095 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_circle_random_hint" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
3097 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
3098 (arg1)->random_hint((std::vector< a_point >
const &)*arg2);
3109 std::vector< a_point > *arg2 = 0 ;
3118 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_circle_fit_cloud self pts nl ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3129 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_circle_fit_cloud" "', argument " "2"" of type '" "std::vector< a_point > &""'");
3131 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
3136 arg3 =
static_cast< short >(val3);
3137 (arg1)->fit_cloud(*arg2,arg3);
3148 std::vector< a_point > *arg2 = 0 ;
3154 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_circle_fit_cloud self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3165 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_circle_fit_cloud" "', argument " "2"" of type '" "std::vector< a_point > &""'");
3167 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
3168 (arg1)->fit_cloud(*arg2);
3178 Tcl_Obj *CONST *argv = objv+1;
3215 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_circle_fit_cloud'.\n"
3216 " Possible C/C++ prototypes are:\n"
3217 " a_shape_circle::fit_cloud(std::vector< a_point > &,short)\n"
3218 " a_shape_circle::fit_cloud(std::vector< a_point > &)\n", TCL_STATIC);
3227 std::vector< a_point > *arg3 = 0 ;
3235 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_circle_export_points self nseg pts ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3245 arg2 =
static_cast< unsigned int >(val2);
3251 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_circle_export_points" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
3253 arg3 =
reinterpret_cast< std::vector< a_point > *
>(argp3);
3254 ((
a_shape_circle const *)arg1)->export_points(arg2,(std::vector< a_point >
const &)*arg3);
3266 std::vector< a_point > *arg3 = 0 ;
3274 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_circle_export_lines self nseg pts ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3284 arg2 =
static_cast< unsigned int >(val2);
3290 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_circle_export_lines" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
3292 arg3 =
reinterpret_cast< std::vector< a_point > *
>(argp3);
3293 ((
a_shape_circle const *)arg1)->export_lines(arg2,(std::vector< a_point >
const &)*arg3);
3307 if (
SWIG_GetArgs(interp, objc, objv,
"o:delete_a_shape_circle self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
3373 a_point *arg2 = (a_point *) 0 ;
3379 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_cylinder_p9pts self pt ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3389 arg2 =
reinterpret_cast< a_point *
>(argp2);
3390 (arg1)->p9pts((a_point
const *)arg2);
3405 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_cylinder_radius self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
3428 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_cylinder_radius self r ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3438 arg2 =
static_cast< double >(val2);
3439 (arg1)->radius(arg2);
3449 Tcl_Obj *CONST *argv = objv+1;
3476 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_cylinder_radius'.\n"
3477 " Possible C/C++ prototypes are:\n"
3478 " a_shape_cylinder::radius() const\n"
3479 " a_shape_cylinder::radius(double const)\n", TCL_STATIC);
3491 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_cylinder_center self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
3514 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_cylinder_center self c ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3528 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
3531 (arg1)->center(arg2);
3541 Tcl_Obj *CONST *argv = objv+1;
3567 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_cylinder_center'.\n"
3568 " Possible C/C++ prototypes are:\n"
3569 " a_shape_cylinder::center() const\n"
3570 " a_shape_cylinder::center(a_point const)\n", TCL_STATIC);
3582 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_cylinder_dir self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
3605 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_cylinder_dir self d ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3619 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
3632 Tcl_Obj *CONST *argv = objv+1;
3658 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_cylinder_dir'.\n"
3659 " Possible C/C++ prototypes are:\n"
3660 " a_shape_cylinder::dir() const\n"
3661 " a_shape_cylinder::dir(a_point const)\n", TCL_STATIC);
3676 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_cylinder_closest_point self pt ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3690 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
3705 std::vector< a_point > *arg3 = 0 ;
3713 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_cylinder_export_points self nseg pts ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3723 arg2 =
static_cast< unsigned int >(val2);
3726 SWIG_exception_fail(
SWIG_ArgError(res3),
"in method '" "a_shape_cylinder_export_points" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
3729 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_cylinder_export_points" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
3731 arg3 =
reinterpret_cast< std::vector< a_point > *
>(argp3);
3732 ((
a_shape_cylinder const *)arg1)->export_points(arg2,(std::vector< a_point >
const &)*arg3);
3744 std::vector< a_point > *arg3 = 0 ;
3752 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_cylinder_export_triangles self nseg pts ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3762 arg2 =
static_cast< unsigned int >(val2);
3765 SWIG_exception_fail(
SWIG_ArgError(res3),
"in method '" "a_shape_cylinder_export_triangles" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
3768 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_cylinder_export_triangles" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
3770 arg3 =
reinterpret_cast< std::vector< a_point > *
>(argp3);
3771 ((
a_shape_cylinder const *)arg1)->export_triangles(arg2,(std::vector< a_point >
const &)*arg3);
3785 if (
SWIG_GetArgs(interp, objc, objv,
"o:delete_a_shape_cylinder self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
3855 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_line_closest_point self p ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3869 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
3872 result = ((
a_shape_line const *)arg1)->closest_point(arg2);
3890 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_line_dist_point self p ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3904 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
3907 result = (double)((
a_shape_line const *)arg1)->dist_point(arg2);
3927 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_line_p2pts self p1 p2 ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
3941 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
3952 arg3 = *(
reinterpret_cast< a_point *
>(argp3));
3955 (arg1)->p2pts(arg2,arg3);
4014 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_line_dir self pt ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4028 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
4041 Tcl_Obj *CONST *argv = objv+1;
4067 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_line_dir'.\n"
4068 " Possible C/C++ prototypes are:\n"
4069 " a_shape_line::dir() const\n"
4070 " a_shape_line::dir(a_point const)\n", TCL_STATIC);
4084 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_line_orig self pt ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4098 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
4111 Tcl_Obj *CONST *argv = objv+1;
4137 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_line_orig'.\n"
4138 " Possible C/C++ prototypes are:\n"
4139 " a_shape_line::orig() const\n"
4140 " a_shape_line::orig(a_point const)\n", TCL_STATIC);
4148 std::vector< a_point > *arg2 = 0 ;
4154 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_line_random_hint self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4165 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_line_random_hint" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
4167 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
4168 (arg1)->random_hint((std::vector< a_point >
const &)*arg2);
4179 std::vector< a_point > *arg2 = 0 ;
4188 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_line_fit_cloud self pts nl ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4201 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
4206 arg3 =
static_cast< short >(val3);
4207 (arg1)->fit_cloud(*arg2,arg3);
4218 std::vector< a_point > *arg2 = 0 ;
4224 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_line_fit_cloud self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4237 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
4238 (arg1)->fit_cloud(*arg2);
4248 Tcl_Obj *CONST *argv = objv+1;
4285 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_line_fit_cloud'.\n"
4286 " Possible C/C++ prototypes are:\n"
4287 " a_shape_line::fit_cloud(std::vector< a_point > &,short)\n"
4288 " a_shape_line::fit_cloud(std::vector< a_point > &)\n", TCL_STATIC);
4296 std::vector< a_point > *arg2 = 0 ;
4302 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_line_export_line self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4313 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_line_export_line" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
4315 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
4316 ((
a_shape_line const *)arg1)->export_line((std::vector< a_point >
const &)*arg2);
4330 if (
SWIG_GetArgs(interp, objc, objv,
"o:delete_a_shape_line self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
4372 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_plane_classname self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
4378 result = (arg1)->classname();
4408 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_plane_normal self p ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4422 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
4440 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_plane_normal self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
4456 Tcl_Obj *CONST *argv = objv+1;
4482 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_plane_normal'.\n"
4483 " Possible C/C++ prototypes are:\n"
4484 " a_shape_plane::normal(a_point const)\n"
4485 " a_shape_plane::normal() const\n", TCL_STATIC);
4497 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_plane_origin self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
4517 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_plane_normalise self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
4523 (arg1)->normalise();
4546 if (
SWIG_GetArgs(interp, objc, objv,
"oooo:a_shape_plane_p3pts self p1 p2 p3 ",(
void *)0,(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4560 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
4571 arg3 = *(
reinterpret_cast< a_point *
>(argp3));
4582 arg4 = *(
reinterpret_cast< a_point *
>(argp4));
4585 (arg1)->p3pts(arg2,arg3,arg4);
4600 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_plane_dist self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
4623 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_plane_dist self v ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4633 arg2 =
static_cast< double >(val2);
4644 Tcl_Obj *CONST *argv = objv+1;
4671 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_plane_dist'.\n"
4672 " Possible C/C++ prototypes are:\n"
4673 " a_shape_plane::dist() const\n"
4674 " a_shape_plane::dist(double const)\n", TCL_STATIC);
4689 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_plane_closest_point self p ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4703 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
4706 result = ((
a_shape_plane const *)arg1)->closest_point(arg2);
4724 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_plane_dist_point self p ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4738 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
4741 result = (double)((
a_shape_plane const *)arg1)->dist_point(arg2);
4752 std::vector< a_point > *arg2 = 0 ;
4758 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_plane_random_hint self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4769 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_plane_random_hint" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
4771 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
4772 (arg1)->random_hint((std::vector< a_point >
const &)*arg2);
4783 std::vector< a_point > *arg2 = 0 ;
4789 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_plane_fit_cloud self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4800 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_plane_fit_cloud" "', argument " "2"" of type '" "std::vector< a_point > &""'");
4802 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
4803 (arg1)->fit_cloud(*arg2);
4817 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_plane_export_3pts self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
4834 std::vector< a_point > *arg2 = 0 ;
4840 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_plane_export_triangles self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4848 SWIG_exception_fail(
SWIG_ArgError(res2),
"in method '" "a_shape_plane_export_triangles" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
4851 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_plane_export_triangles" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
4853 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
4854 ((
a_shape_plane const *)arg1)->export_triangles((std::vector< a_point >
const &)*arg2);
4868 if (
SWIG_GetArgs(interp, objc, objv,
"o:delete_a_shape_plane self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
4944 a_point *arg10 = 0 ;
4966 if (
SWIG_GetArgs(interp, objc, objv,
"oooooooooo:a_shape_quadric_p9pts self p1 p2 p3 p4 p5 p6 p7 p8 p9 ",(
void *)0,(
void *)0,(
void *)0,(
void *)0,(
void *)0,(
void *)0,(
void *)0,(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
4979 arg2 =
reinterpret_cast< a_point *
>(argp2);
4987 arg3 =
reinterpret_cast< a_point *
>(argp3);
4995 arg4 =
reinterpret_cast< a_point *
>(argp4);
5003 arg5 =
reinterpret_cast< a_point *
>(argp5);
5011 arg6 =
reinterpret_cast< a_point *
>(argp6);
5019 arg7 =
reinterpret_cast< a_point *
>(argp7);
5027 arg8 =
reinterpret_cast< a_point *
>(argp8);
5035 arg9 =
reinterpret_cast< a_point *
>(argp9);
5043 arg10 =
reinterpret_cast< a_point *
>(argp10);
5044 (arg1)->p9pts((a_point
const &)*arg2,(a_point
const &)*arg3,(a_point
const &)*arg4,(a_point
const &)*arg5,(a_point
const &)*arg6,(a_point
const &)*arg7,(a_point
const &)*arg8,(a_point
const &)*arg9,(a_point
const &)*arg10);
5059 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_quadric_center self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
5080 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_quadric_principals self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
5101 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_quadric_n1 self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
5122 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_quadric_n2 self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
5143 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_quadric_n3 self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
5163 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_quadric_export_matrices self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
5181 std::vector< a_point > *arg3 = 0 ;
5189 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_quadric_export_points self nseg pts ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
5199 arg2 =
static_cast< unsigned int >(val2);
5202 SWIG_exception_fail(
SWIG_ArgError(res3),
"in method '" "a_shape_quadric_export_points" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
5205 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_quadric_export_points" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
5207 arg3 =
reinterpret_cast< std::vector< a_point > *
>(argp3);
5208 ((
a_shape_quadric const *)arg1)->export_points(arg2,(std::vector< a_point >
const &)*arg3);
5220 std::vector< a_point > *arg3 = 0 ;
5228 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_quadric_export_triangles self nseg pts ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
5238 arg2 =
static_cast< unsigned int >(val2);
5241 SWIG_exception_fail(
SWIG_ArgError(res3),
"in method '" "a_shape_quadric_export_triangles" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
5244 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_quadric_export_triangles" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
5246 arg3 =
reinterpret_cast< std::vector< a_point > *
>(argp3);
5247 ((
a_shape_quadric const *)arg1)->export_triangles(arg2,(std::vector< a_point >
const &)*arg3);
5281 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_quadric_Ap self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
5321 if (
SWIG_GetArgs(interp, objc, objv,
"o:delete_a_shape_quadric self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
5396 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_sphere_closest_point self p ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
5410 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
5431 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_sphere_dist_point self p ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
5445 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
5448 result = (double)((
a_shape_sphere const *)arg1)->dist_point(arg2);
5474 if (
SWIG_GetArgs(interp, objc, objv,
"ooooo:a_shape_sphere_p4pts self p1 p2 p3 p4 ",(
void *)0,(
void *)0,(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
5488 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
5499 arg3 = *(
reinterpret_cast< a_point *
>(argp3));
5510 arg4 = *(
reinterpret_cast< a_point *
>(argp4));
5521 arg5 = *(
reinterpret_cast< a_point *
>(argp5));
5524 (arg1)->p4pts(arg2,arg3,arg4,arg5);
5539 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_sphere_center self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
5560 if (
SWIG_GetArgs(interp, objc, objv,
"o:a_shape_sphere_radius self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
5583 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_sphere_center self pt ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
5597 arg2 = *(
reinterpret_cast< a_point *
>(argp2));
5600 (arg1)->center(arg2);
5610 Tcl_Obj *CONST *argv = objv+1;
5636 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_sphere_center'.\n"
5637 " Possible C/C++ prototypes are:\n"
5638 " a_shape_sphere::center() const\n"
5639 " a_shape_sphere::center(a_point const)\n", TCL_STATIC);
5653 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_sphere_radius self r ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
5663 arg2 =
static_cast< double >(val2);
5664 (arg1)->radius(arg2);
5674 Tcl_Obj *CONST *argv = objv+1;
5701 Tcl_SetResult(interp,(
char *)
"Wrong number or type of arguments for overloaded function 'a_shape_sphere_radius'.\n"
5702 " Possible C/C++ prototypes are:\n"
5703 " a_shape_sphere::radius() const\n"
5704 " a_shape_sphere::radius(double)\n", TCL_STATIC);
5712 std::vector< a_point > *arg2 = 0 ;
5718 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_sphere_random_hint self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
5729 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_sphere_random_hint" "', argument " "2"" of type '" "std::vector< a_point > const &""'");
5731 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
5732 (arg1)->random_hint((std::vector< a_point >
const &)*arg2);
5743 std::vector< a_point > *arg2 = 0 ;
5749 if (
SWIG_GetArgs(interp, objc, objv,
"oo:a_shape_sphere_fit_cloud self pts ",(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
5760 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_sphere_fit_cloud" "', argument " "2"" of type '" "std::vector< a_point > &""'");
5762 arg2 =
reinterpret_cast< std::vector< a_point > *
>(argp2);
5763 (arg1)->fit_cloud(*arg2);
5775 std::vector< a_point > *arg3 = 0 ;
5783 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_sphere_export_points self nseg pts ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
5793 arg2 =
static_cast< unsigned int >(val2);
5799 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_sphere_export_points" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
5801 arg3 =
reinterpret_cast< std::vector< a_point > *
>(argp3);
5802 ((
a_shape_sphere const *)arg1)->export_points(arg2,(std::vector< a_point >
const &)*arg3);
5814 std::vector< a_point > *arg3 = 0 ;
5822 if (
SWIG_GetArgs(interp, objc, objv,
"ooo:a_shape_sphere_export_triangles self nseg pts ",(
void *)0,(
void *)0,(
void *)0) == TCL_ERROR)
SWIG_fail;
5832 arg2 =
static_cast< unsigned int >(val2);
5835 SWIG_exception_fail(
SWIG_ArgError(res3),
"in method '" "a_shape_sphere_export_triangles" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
5838 SWIG_exception_fail(
SWIG_ValueError,
"invalid null reference " "in method '" "a_shape_sphere_export_triangles" "', argument " "3"" of type '" "std::vector< a_point > const &""'");
5840 arg3 =
reinterpret_cast< std::vector< a_point > *
>(argp3);
5841 ((
a_shape_sphere const *)arg1)->export_triangles(arg2,(std::vector< a_point >
const &)*arg3);
5855 if (
SWIG_GetArgs(interp, objc, objv,
"o:delete_a_shape_sphere self ",(
void *)0) == TCL_ERROR)
SWIG_fail;
6071 static swig_cast_info _swigc__p_a_base[] = { {&
_swigt__p_a_shape_plane,
_p_a_shape_planeTo_p_a_base, 0, 0}, {&
_swigt__p_a_base, 0, 0, 0}, {&
_swigt__p_a_shape,
_p_a_shapeTo_p_a_base, 0, 0}, {&
_swigt__p_a_shape_quadric,
_p_a_shape_quadricTo_p_a_base, 0, 0}, {&
_swigt__p_a_shape_circle,
_p_a_shape_circleTo_p_a_base, 0, 0}, {&
_swigt__p_a_shape_line,
_p_a_shape_lineTo_p_a_base, 0, 0}, {&
_swigt__p_a_shape_sphere,
_p_a_shape_sphereTo_p_a_base, 0, 0},{0, 0, 0, 0}};
6073 static swig_cast_info _swigc__p_a_shape[] = { {&
_swigt__p_a_shape_plane,
_p_a_shape_planeTo_p_a_shape, 0, 0}, {&
_swigt__p_a_shape, 0, 0, 0}, {&
_swigt__p_a_shape_quadric,
_p_a_shape_quadricTo_p_a_shape, 0, 0}, {&
_swigt__p_a_shape_circle,
_p_a_shape_circleTo_p_a_shape, 0, 0}, {&
_swigt__p_a_shape_line,
_p_a_shape_lineTo_p_a_shape, 0, 0}, {&
_swigt__p_a_shape_sphere,
_p_a_shape_sphereTo_p_a_shape, 0, 0},{0, 0, 0, 0}};
6154 #define SWIGRUNTIME_DEBUG
6190 }
while (iter!= module_head);
6201 if (init == 0)
return;
6204 #ifdef SWIGRUNTIME_DEBUG
6205 printf(
"SWIG_InitializeModule: size %lu\n", (
unsigned long)
swig_module.
size);
6212 #ifdef SWIGRUNTIME_DEBUG
6222 #ifdef SWIGRUNTIME_DEBUG
6223 printf(
"SWIG_InitializeModule: found type %s\n", type->
name);
6227 #ifdef SWIGRUNTIME_DEBUG
6228 printf(
"SWIG_InitializeModule: found and overwrite type %s \n", type->
name);
6237 while (cast->
type) {
6240 #ifdef SWIGRUNTIME_DEBUG
6241 printf(
"SWIG_InitializeModule: look cast %s\n", cast->
type->
name);
6245 #ifdef SWIGRUNTIME_DEBUG
6246 if (ret) printf(
"SWIG_InitializeModule: found cast %s\n", ret->
name);
6251 #ifdef SWIGRUNTIME_DEBUG
6252 printf(
"SWIG_InitializeModule: skip old type %s\n", ret->
name);
6259 #ifdef SWIGRUNTIME_DEBUG
6260 if (ocast) printf(
"SWIG_InitializeModule: skip old cast %s\n", ret->
name);
6262 if (!ocast) ret = 0;
6267 #ifdef SWIGRUNTIME_DEBUG
6268 printf(
"SWIG_InitializeModule: adding cast %s\n", cast->
type->
name);
6283 #ifdef SWIGRUNTIME_DEBUG
6284 printf(
"**** SWIG_InitializeModule: Cast List ******\n");
6289 while (cast->
type) {
6290 printf(
"SWIG_InitializeModule: cast type %s\n", cast->
type->
name);
6294 printf(
"---- Total casts: %d\n",j);
6296 printf(
"**** SWIG_InitializeModule: Cast List ******\n");
6309 static int init_run = 0;
6311 if (init_run)
return;
6322 equiv = equiv->
next;
6356 for (i = 0; constants[i].
type; i++) {
6357 switch(constants[i].type) {
6362 obj =
SWIG_NewPackedObj(constants[i].pvalue, constants[i].lvalue, *(constants[i].ptype));
6385 Tcl_InitHashTable(&(klass->
hashtable), TCL_STRING_KEYS);
6386 for (meth = klass->
methods; meth && meth->
name; ++meth) {
6388 Tcl_HashEntry* hashentry = Tcl_CreateHashEntry(&(klass->
hashtable), meth->name, &newEntry);
6389 Tcl_SetHashValue(hashentry, (ClientData)meth->method);
6405 if (interp == 0)
return TCL_ERROR;
6406 #ifdef USE_TCL_STUBS
6421 #ifdef SWIG_namespace
6422 Tcl_Eval(interp,
"namespace eval " SWIG_namespace
" { }");
6434 Tcl_TraceVar(interp, (
char *)
swig_variables[i].
name, TCL_TRACE_READS | TCL_GLOBAL_ONLY,
6436 Tcl_TraceVar(interp, (
char *)
swig_variables[i].
name, TCL_TRACE_WRITES | TCL_GLOBAL_ONLY,
6445 printf(
"Points&forces a_shape module.\n");
6446 printf(
"Type a_shape_help for an introduction.\n");
#define SWIGTYPE_p_std__vectorT_a_point_t
static swig_attribute swig_a_shape_line_attributes[]
SWIGRUNTIME char * SWIG_PackData(char *c, void *ptr, size_t sz)
static swig_var_info swig_variables[]
SWIGINTERN int _wrap_a_shape_quadric_b(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static void * _p_a_shape_planeTo_p_a_shape(void *x, int *SWIGUNUSEDPARM(newmemory))
static const char * swig_a_shape_plane_base_names[]
SWIGINTERNINLINE Tcl_Obj * SWIG_From_std_string(const std::string &s)
static swig_cast_info * swig_cast_initial[]
static void * _p_a_shape_circleTo_p_a_shape(void *x, int *SWIGUNUSEDPARM(newmemory))
SWIGINTERN int _wrap_a_shape_cylinder_closest_point(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_average_dist_cloud(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN void swig_delete_a_shape_quadric(void *obj)
SWIGINTERN int _wrap_a_shape_help(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME int SWIG_Tcl_ObjectConstructor(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_class * swig_a_shape_plane_bases[]
SWIGINTERN int _wrap_a_shape_line_dir__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME char * SWIG_PackVoidPtr(char *buff, void *ptr, const char *name, size_t bsz)
SWIGINTERN int _wrap_a_shape_P__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_sphere_dist_point(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIG_MakePtr(c, ptr, ty, flags)
static const char * swig_a_shape_quadric_base_names[]
SWIGINTERN void swig_delete_a_shape_circle(void *obj)
SWIGINTERN int _wrap_a_shape_cylinder_dir__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN void SWIG_Tcl_InstallConstants(Tcl_Interp *interp, swig_const_info constants[])
SWIGINTERN void a_shape_quadric_Ap(a_shape_quadric *self)
SWIGINTERN int _wrap_a_shape_dist_cloud(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_const_info swig_constants[]
static swig_attribute swig_a_shape_attributes[]
SWIGINTERN int _wrap_a_shape_cylinder_dir(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_delete_a_shape_circle(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIG_ConvertPtr(oc, ptr, ty, flags)
SWIGINTERN int _wrap_new_a_shape_sphere(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_npara(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_circle_fit_cloud__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_plane_dist__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIG_CheckState(r)
SWIGINTERN int _wrap_a_shape_line_fit_cloud__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_circle_dist_point(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME void SWIG_Tcl_Acquire(void *ptr)
SWIGRUNTIME int SWIG_TypeEquiv(const char *nb, const char *tb)
SWIGINTERN std::string a_base_print(a_base *self)
struct swig_instance swig_instance
#define SWIGTYPE_p_a_shape_plane
SWIGINTERNINLINE void SWIG_Tcl_AddErrorMsg(Tcl_Interp *interp, const char *mesg)
static void * _p_a_shapeTo_p_a_base(void *x, int *SWIGUNUSEDPARM(newmemory))
static void * _p_a_shape_sphereTo_p_a_base(void *x, int *SWIGUNUSEDPARM(newmemory))
SWIGINTERN void SWIG_Tcl_SetErrorMsg(Tcl_Interp *interp, const char *ctype, const char *mesg)
struct swig_cast_info swig_cast_info
SWIGRUNTIME Tcl_Obj * SWIG_Tcl_NewPackedObj(void *ptr, int sz, swig_type_info *type)
SWIGRUNTIME int SWIG_Tcl_MethodCommand(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST _objv[])
SWIGRUNTIME int SWIG_TypeNameComp(const char *f1, const char *l1, const char *f2, const char *l2)
static swig_cast_info _swigc__p_a_shape_quadric[]
SWIGINTERN int _wrap_a_shape_quadric_help(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIMEINLINE void * SWIG_TypeCast(swig_cast_info *ty, void *ptr, int *newmemory)
static swig_cast_info _swigc__p_a_shape_line[]
static swig_type_info _swigt__p_a_shape_cylinder
#define SWIG_RuntimeError
SWIGINTERN void swig_delete_a_shape(void *obj)
SWIGINTERN int _wrap_a_base_help(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_attribute swig_a_shape_quadric_attributes[]
SWIGINTERN int _wrap_a_shape_sphere_radius__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_method swig_a_shape_cylinder_methods[]
static swig_command_info swig_commands[]
SWIGINTERN int _wrap_a_shape_sphere_p4pts(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_class _wrap_class_a_shape_circle
SWIGINTERN int _wrap_a_shape_circle_fit_cloud__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_base_small__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIGTYPE_p_a_shape_circle
int(* swig_wrapper_func)(ClientData, Tcl_Interp *, int, Tcl_Obj *CONST[])
static swig_attribute swig_a_shape_plane_attributes[]
static swig_type_info _swigt__p_a_shape_plane
static swig_type_info _swigt__p_std__vectorT_a_point_t
SWIGINTERN const char * SWIG_Tcl_ErrorType(int code)
SWIGRUNTIME const char * SWIG_TypePrettyName(const swig_type_info *type)
static swig_attribute swig_a_shape_sphere_attributes[]
SWIGINTERN void a_shape_quadric_b(a_shape_quadric *self)
SWIGINTERN int _wrap_a_shape_plane_normal(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_circle_help(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_method swig_a_base_methods[]
SWIGINTERN int _wrap_a_shape_plane_closest_point(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_quadric_n3(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_delete_a_shape_plane(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_type_info _swigt__p_a_shape_circle
SWIGINTERN int _wrap_a_shape_quadric_export_triangles(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_line_fit_cloud__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN void swig_delete_a_shape_line(void *obj)
#define SWIG_RUNTIME_VERSION
SWIGINTERN int _wrap_a_shape_line_dist_point(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN void SWIG_Tcl_SetErrorObj(Tcl_Interp *interp, const char *ctype, Tcl_Obj *obj)
SWIGRUNTIME void SWIG_TypeClientData(swig_type_info *ti, void *clientdata)
static Tcl_HashTable swigconstTable
static swig_type_info _swigt__p_a_shape_sphere
SWIGINTERN int _wrap_a_shape_circle_orig(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIG_MethodCommand
static const char * swig_a_shape_line_base_names[]
SWIGINTERN int _wrap_a_shape_circle_dir(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_classname(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME int SWIG_Tcl_GetArgs(Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[], const char *fmt,...)
SWIGINTERNINLINE Tcl_Obj * SWIG_From_int(int value)
SWIGINTERN int _wrap_a_shape_sphere_center(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_new_a_shape_cylinder(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_class _wrap_class_a_shape_sphere
SWIGINTERN int _wrap_a_shape_line_orig(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN void swig_delete_a_shape_sphere(void *obj)
SWIGINTERN int _wrap_a_shape_circle_radius__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_line_dir(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_method swig_a_shape_sphere_methods[]
static swig_attribute swig_a_shape_cylinder_attributes[]
SWIGINTERN int _wrap_a_shape_circle_dir__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIG_exception_fail(code, msg)
static swig_cast_info _swigc__p_a_shape_sphere[]
SWIGINTERN int _wrap_a_base_small(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_quadric_export_matrices(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_circle_radius(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIGTYPE_p_a_shape
static swig_type_info * swig_types[13]
SWIGINTERN int _wrap_a_shape_rms_dist_cloud(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_circle_fit_cloud(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME swig_type_info * SWIG_TypeQueryModule(swig_module_info *start, swig_module_info *end, const char *name)
static swig_cast_info _swigc__p_a_base[]
#define SWIG_AttributeError
SWIGINTERN int _wrap_a_shape_cylinder_center__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_class * swig_a_shape_bases[]
static swig_module_info swig_module
SWIGINTERN int _wrap_a_base_small__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_class _wrap_class_a_shape_cylinder
static swig_cast_info _swigc__p_std__vectorT_a_point_t[]
SWIGINTERN int _wrap_a_shape_line_export_line(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_quadric_center(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_delete_a_shape_sphere(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_type_info _swigt__p_a_shape_quadric
SWIGINTERN int _wrap_a_shape_cylinder_p9pts(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static void * _p_a_shape_planeTo_p_a_base(void *x, int *SWIGUNUSEDPARM(newmemory))
static swig_class _wrap_class_a_shape_line
static swig_cast_info _swigc__p_a_shape[]
#define SWIG_SetModule(clientdata, pointer)
#define SWIGTYPE_p_a_shape_cylinder
SWIGRUNTIMEINLINE const char * SWIG_TypeName(const swig_type_info *ty)
SWIGINTERN int _wrap_a_shape_best_fitting_cloud(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIGUNUSEDPARM(p)
SWIGINTERN int _wrap_a_shape_plane_normal__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_P__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_sphere_radius__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIGTYPE_p_a_shape_sphere
SWIGINTERN int _wrap_new_a_base(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
struct swig_class swig_class
#define SWIG_as_voidptr(a)
SWIGINTERN int _wrap_a_shape_plane_export_triangles(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN void swig_delete_a_base(void *obj)
SWIGRUNTIME void SWIG_TypeNewClientData(swig_type_info *ti, void *clientdata)
SWIGINTERN int _wrap_a_shape_plane_random_hint(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME void SWIG_Tcl_SetModule(Tcl_Interp *interp, swig_module_info *module)
SWIGRUNTIME int SWIG_TypeCmp(const char *nb, const char *tb)
SWIGRUNTIMEINLINE int SWIG_Tcl_ConvertPtr(Tcl_Interp *interp, Tcl_Obj *oc, void **ptr, swig_type_info *ty, int flags)
static void * _p_a_shape_lineTo_p_a_shape(void *x, int *SWIGUNUSEDPARM(newmemory))
SWIGINTERN int _wrap_a_shape_line_random_hint(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_class * swig_a_shape_quadric_bases[]
struct swig_const_info swig_const_info
static swig_class * swig_a_shape_cylinder_bases[]
SWIGINTERN int _wrap_new_a_shape_plane(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME int SWIG_Tcl_Thisown(void *ptr)
SWIGRUNTIME void SWIG_InitializeModule(void *clientdata)
SWIGRUNTIME const char * SWIG_UnpackData(const char *c, void *ptr, size_t sz)
SWIGINTERN int _wrap_a_shape_cylinder_help(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_type_info _swigt__p_a_point
SWIGINTERN void SWIG_Tcl_SetConstantObj(Tcl_Interp *interp, const char *name, Tcl_Obj *obj)
SWIGRUNTIMEINLINE Tcl_Obj * SWIG_Tcl_NewPointerObj(void *ptr, swig_type_info *type, int flags)
SWIGINTERN int _wrap_delete_a_shape_cylinder(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGEXPORT int A_shape_SafeInit(Tcl_Interp *interp)
SWIGINTERN int _wrap_delete_a_shape_quadric(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_cast_info _swigc__p_char[]
SWIGINTERN int _wrap_a_shape_circle_export_points(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_para(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME swig_cast_info * SWIG_TypeCheckStruct(swig_type_info *from, swig_type_info *ty)
static swig_method swig_a_shape_circle_methods[]
SWIGINTERN int _wrap_a_shape_sphere_radius(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_base_print(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_plane_export_3pts(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_cast_info _swigc__p_a_shape_plane[]
SWIGINTERN int _wrap_a_shape_line_orig__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_cylinder_dir__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_new_a_shape_circle(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_sphere_help(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_delete_a_shape_line(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_sphere_export_triangles(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIGTYPE_p_a_shape_quadric
SWIGINTERN int _wrap_a_shape_circle_orig__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_line_fit_cloud(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIG_NewPointerObj(ptr, type, flags)
SWIGINTERN int _wrap_new_a_shape_quadric(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIG_Thisown(ptr)
SWIGRUNTIME const char * SWIG_UnpackDataName(const char *c, void *ptr, size_t sz, const char *name)
SWIGINTERN int _wrap_a_shape_circle_closest_point(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
void *(* swig_converter_func)(void *, int *)
#define SWIG_POINTER_NO_NULL
SWIGINTERN int _wrap_a_shape_getparameters(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_P(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static const char * swig_a_shape_cylinder_base_names[]
static void * _p_a_shape_circleTo_p_a_base(void *x, int *SWIGUNUSEDPARM(newmemory))
SWIGRUNTIME Tcl_Obj * SWIG_Tcl_NewInstanceObj(Tcl_Interp *interp, void *thisvalue, swig_type_info *type, int flags)
#define SWIG_NullReferenceError
SWIGINTERN int _wrap_a_shape_cylinder_radius__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_delete_a_base(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_cast_info _swigc__p_a_shape_circle[]
SWIGINTERN int _wrap_new_a_shape_line(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_line_dir__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_threshold_cloud(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIG_POINTER_DISOWN
SWIGINTERN int _wrap_a_shape_sphere_closest_point(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
struct swig_type_info swig_type_info
SWIGINTERN int _wrap_a_shape_plane_normalise(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_sphere_export_points(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_line_p2pts(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME char * SWIG_Tcl_PointerTypeFromString(char *c)
static void * _p_a_shape_sphereTo_p_a_shape(void *x, int *SWIGUNUSEDPARM(newmemory))
SWIGINTERN int _wrap_a_shape_plane_p3pts(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_quadric_n1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME int SWIG_Tcl_Disown(void *ptr)
SWIGINTERNINLINE Tcl_Obj * SWIG_From_unsigned_SS_long(unsigned long value)
static swig_method swig_a_shape_quadric_methods[]
#define SWIG_ObjectDelete
SWIGINTERN int _wrap_a_shape_cylinder_radius(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_plane_origin(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_quadric_n2(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_delete_a_shape(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static void * _p_a_shape_lineTo_p_a_base(void *x, int *SWIGUNUSEDPARM(newmemory))
#define SWIG_NewPackedObj(ptr, sz, type)
#define SWIGTYPE_p_vnl_vectorT_double_t
SWIGINTERN int _wrap_a_shape_circle_dir__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static void * _p_a_shape_quadricTo_p_a_shape(void *x, int *SWIGUNUSEDPARM(newmemory))
#define SWIG_GetModule(clientdata)
static swig_type_info _swigt__p_a_shape_line
SWIGRUNTIME void SWIG_PropagateClientData(void)
SWIGINTERN int _wrap_a_shape_cylinder_export_triangles(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME swig_cast_info * SWIG_TypeCheck(const char *c, swig_type_info *ty)
static swig_cast_info _swigc__p_a_point[]
SWIGINTERN Tcl_Obj * SWIG_Tcl_GetConstantObj(const char *key)
SWIGINTERN int _wrap_a_shape_circle_radius__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_class _wrap_class_a_shape
SWIGINTERN int _wrap_a_shape_line_help(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_quadric_Ap(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_method swig_a_shape_methods[]
#define SWIGTYPE_p_a_point
SWIGINTERN int _wrap_a_shape_plane_dist(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERNINLINE Tcl_Obj * SWIG_FromCharPtrAndSize(const char *carray, size_t size)
SWIGINTERN int _wrap_a_shape_sphere_random_hint(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIG_TYPE_TABLE_NAME
SWIGRUNTIME swig_type_info * SWIG_MangledTypeQueryModule(swig_module_info *start, swig_module_info *end, const char *name)
SWIGINTERN int _wrap_a_base_classname(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_sphere_center__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIGTYPE_p_a_base
SWIGINTERN int _wrap_a_shape_dist_point(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static const char * swig_a_base_base_names[]
SWIGRUNTIME swig_module_info * SWIG_Tcl_GetModule(Tcl_Interp *interp)
SWIGINTERN int _wrap_a_shape_circle_random_hint(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
struct swig_module_info swig_module_info
SWIGINTERN int _wrap_a_shape_quadric_export_points(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_class _wrap_class_a_base
SWIGINTERN int _wrap_a_shape_sphere_center__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIG_Acquire(ptr)
SWIGINTERN int _wrap_a_shape_cylinder_center__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME void SWIG_Tcl_ObjectDelete(ClientData clientData)
#define SWIG_TCL_HASHTABLE_INIT
SWIGRUNTIME int SWIG_Tcl_ConvertPacked(Tcl_Interp *SWIGUNUSEDPARM(interp), Tcl_Obj *obj, void *ptr, int sz, swig_type_info *ty)
SWIGINTERN int _wrap_a_shape_line_closest_point(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIGTYPE_p_a_shape_line
#define SWIG_ObjectConstructor
static swig_type_info _swigt__p_a_base
#define SWIG_NewInstanceObj(thisvalue, type, flags)
SWIGINTERN int _wrap_a_shape_cylinder_center(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERNINLINE Tcl_Obj * SWIG_From_unsigned_SS_int(unsigned int value)
SWIGINTERN int _wrap_a_shape_circle_orig__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static const char * swig_a_shape_circle_base_names[]
static swig_type_info * swig_type_initial[]
static swig_class * swig_a_shape_line_bases[]
SWIGINTERN int _wrap_a_shape_sphere_fit_cloud(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_cylinder_radius__SWIG_0(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static int swigconstTableinit
SWIGINTERN int _wrap_a_shape_quadric_A(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
struct swig_attribute swig_attribute
void(* swig_delete_func)(ClientData)
SWIGINTERN int _wrap_a_shape_plane_classname(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGRUNTIME Tcl_HashTable * SWIG_Tcl_ObjectTable(void)
SWIGRUNTIME int SWIG_Tcl_ConvertPtrFromString(Tcl_Interp *interp, const char *c, void **ptr, swig_type_info *ty, int flags)
SWIGRUNTIME swig_type_info * SWIG_TypeDynamicCast(swig_type_info *ty, void **ptr)
static swig_method swig_a_shape_plane_methods[]
static swig_cast_info _swigc__p_a_shape_cylinder[]
static const char * swig_a_shape_sphere_base_names[]
static swig_type_info _swigt__p_a_shape
SWIGRUNTIME const char * SWIG_UnpackVoidPtr(const char *c, void **ptr, const char *name)
static swig_class * swig_a_shape_circle_bases[]
static void * _p_a_shape_quadricTo_p_a_base(void *x, int *SWIGUNUSEDPARM(newmemory))
#define SWIG_DivisionByZero
static swig_type_info _swigt__p_char
SWIGINTERN int _wrap_a_shape_line_orig__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
struct swig_method swig_method
#define SWIG_TCL_DECL_ARGS_2(arg1, arg2)
static swig_class * swig_a_shape_sphere_bases[]
SWIGINTERN int _wrap_a_shape_closest_point(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
#define SWIG_OverflowError
SWIGINTERN int _wrap_a_shape_plane_fit_cloud(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_circle_p3pts(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
int(* swig_wrapper)(ClientData, Tcl_Interp *, int, Tcl_Obj *CONST[])
SWIGINTERN int _wrap_a_shape_circle_export_lines(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_quadric_p9pts(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERNINLINE Tcl_Obj * SWIG_From_long(long value)
SWIGINTERN int _wrap_a_shape_cylinder_export_points(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_type_info _swigt__p_vnl_vectorT_double_t
SWIGRUNTIME void SWIG_Tcl_MakePtr(char *c, void *ptr, swig_type_info *ty, int SWIGUNUSEDPARM(flags))
struct swig_type_info *(* swig_dycast_func)(void **)
#define SWIG_TCL_CALL_ARGS_2(arg1, arg2)
static const char * swig_a_shape_base_names[]
SWIGINTERN int _wrap_a_shape_plane_normal__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_attribute swig_a_shape_circle_attributes[]
static swig_class * swig_a_base_bases[]
SWIGINTERN int _wrap_a_shape_fit_cloud(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN void swig_delete_a_shape_cylinder(void *obj)
SWIGINTERN void a_shape_quadric_A(a_shape_quadric *self)
static swig_cast_info _swigc__p_vnl_vectorT_double_t[]
SWIGINTERN void SWIG_Tcl_InstallMethodLookupTables(void)
#define SWIG_TCL_STUBS_VERSION
SWIGINTERN int _wrap_a_shape_plane_dist__SWIG_1(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN int _wrap_a_shape_quadric_principals(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
SWIGINTERN void swig_delete_a_shape_plane(void *obj)
SWIGRUNTIME char * SWIG_PackDataName(char *buff, void *ptr, size_t sz, const char *name, size_t bsz)
SWIGINTERN int _wrap_a_shape_plane_dist_point(ClientData clientData SWIGUNUSED, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[])
static swig_attribute swig_a_base_attributes[]
static swig_method swig_a_shape_line_methods[]
static swig_class _wrap_class_a_shape_quadric
#define SWIGRUNTIMEINLINE
static swig_class _wrap_class_a_shape_plane
static const std::string help()
static const std::string help()
static const std::string help()
void normal(const a_point p)
a_point principals() const
static const std::string help()
virtual void export_matrices() const
static const std::string help()
static const std::string help()
vnl_vector< double > getparameters() const
virtual const std::string classname() const
double v(const uint32_t step, const uint32_t n)
a_point normal(int i, int l)
a_point dir(int i, int l)
struct swig_cast_info * prev
struct swig_cast_info * next
swig_converter_func converter
struct swig_class ** bases
swig_module_info * module
void(* destructor)(void *)
swig_attribute * attributes
swig_cast_info ** cast_initial
swig_type_info ** type_initial
struct swig_module_info * next
struct swig_cast_info * cast