itclIntDecls.h 42 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046
  1. /*
  2. * This file is (mostly) automatically generated from itcl.decls.
  3. */
  4. #ifndef _ITCLINTDECLS
  5. #define _ITCLINTDECLS
  6. /* !BEGIN!: Do not edit below this line. */
  7. #define ITCLINT_STUBS_EPOCH 0
  8. #define ITCLINT_STUBS_REVISION 152
  9. #ifdef __cplusplus
  10. extern "C" {
  11. #endif
  12. /*
  13. * Exported function declarations:
  14. */
  15. /* 0 */
  16. ITCLAPI int Itcl_IsClassNamespace(Tcl_Namespace *namesp);
  17. /* 1 */
  18. ITCLAPI int Itcl_IsClass(Tcl_Command cmd);
  19. /* 2 */
  20. ITCLAPI ItclClass * Itcl_FindClass(Tcl_Interp *interp, const char *path,
  21. int autoload);
  22. /* 3 */
  23. ITCLAPI int Itcl_FindObject(Tcl_Interp *interp, const char *name,
  24. ItclObject **roPtr);
  25. /* 4 */
  26. ITCLAPI int Itcl_IsObject(Tcl_Command cmd);
  27. /* 5 */
  28. ITCLAPI int Itcl_ObjectIsa(ItclObject *contextObj,
  29. ItclClass *cdefn);
  30. /* 6 */
  31. ITCLAPI int Itcl_Protection(Tcl_Interp *interp, int newLevel);
  32. /* 7 */
  33. ITCLAPI const char * Itcl_ProtectionStr(int pLevel);
  34. /* 8 */
  35. ITCLAPI int Itcl_CanAccess(ItclMemberFunc *memberPtr,
  36. Tcl_Namespace *fromNsPtr);
  37. /* 9 */
  38. ITCLAPI int Itcl_CanAccessFunc(ItclMemberFunc *mfunc,
  39. Tcl_Namespace *fromNsPtr);
  40. /* Slot 10 is reserved */
  41. /* 11 */
  42. ITCLAPI void Itcl_ParseNamespPath(const char *name,
  43. Tcl_DString *buffer, const char **head,
  44. const char **tail);
  45. /* 12 */
  46. ITCLAPI int Itcl_DecodeScopedCommand(Tcl_Interp *interp,
  47. const char *name, Tcl_Namespace **rNsPtr,
  48. char **rCmdPtr);
  49. /* 13 */
  50. ITCLAPI int Itcl_EvalArgs(Tcl_Interp *interp, int objc,
  51. Tcl_Obj *const objv[]);
  52. /* 14 */
  53. ITCLAPI Tcl_Obj * Itcl_CreateArgs(Tcl_Interp *interp,
  54. const char *string, int objc,
  55. Tcl_Obj *const objv[]);
  56. /* Slot 15 is reserved */
  57. /* Slot 16 is reserved */
  58. /* 17 */
  59. ITCLAPI int Itcl_GetContext(Tcl_Interp *interp,
  60. ItclClass **iclsPtrPtr,
  61. ItclObject **ioPtrPtr);
  62. /* 18 */
  63. ITCLAPI void Itcl_InitHierIter(ItclHierIter *iter,
  64. ItclClass *iclsPtr);
  65. /* 19 */
  66. ITCLAPI void Itcl_DeleteHierIter(ItclHierIter *iter);
  67. /* 20 */
  68. ITCLAPI ItclClass * Itcl_AdvanceHierIter(ItclHierIter *iter);
  69. /* 21 */
  70. ITCLAPI int Itcl_FindClassesCmd(ClientData clientData,
  71. Tcl_Interp *interp, int objc,
  72. Tcl_Obj *const objv[]);
  73. /* 22 */
  74. ITCLAPI int Itcl_FindObjectsCmd(ClientData clientData,
  75. Tcl_Interp *interp, int objc,
  76. Tcl_Obj *const objv[]);
  77. /* Slot 23 is reserved */
  78. /* 24 */
  79. ITCLAPI int Itcl_DelClassCmd(ClientData clientData,
  80. Tcl_Interp *interp, int objc,
  81. Tcl_Obj *const objv[]);
  82. /* 25 */
  83. ITCLAPI int Itcl_DelObjectCmd(ClientData clientData,
  84. Tcl_Interp *interp, int objc,
  85. Tcl_Obj *const objv[]);
  86. /* 26 */
  87. ITCLAPI int Itcl_ScopeCmd(ClientData clientData,
  88. Tcl_Interp *interp, int objc,
  89. Tcl_Obj *const objv[]);
  90. /* 27 */
  91. ITCLAPI int Itcl_CodeCmd(ClientData clientData,
  92. Tcl_Interp *interp, int objc,
  93. Tcl_Obj *const objv[]);
  94. /* 28 */
  95. ITCLAPI int Itcl_StubCreateCmd(ClientData clientData,
  96. Tcl_Interp *interp, int objc,
  97. Tcl_Obj *const objv[]);
  98. /* 29 */
  99. ITCLAPI int Itcl_StubExistsCmd(ClientData clientData,
  100. Tcl_Interp *interp, int objc,
  101. Tcl_Obj *const objv[]);
  102. /* 30 */
  103. ITCLAPI int Itcl_IsStub(Tcl_Command cmd);
  104. /* 31 */
  105. ITCLAPI int Itcl_CreateClass(Tcl_Interp *interp,
  106. const char *path, ItclObjectInfo *info,
  107. ItclClass **rPtr);
  108. /* 32 */
  109. ITCLAPI int Itcl_DeleteClass(Tcl_Interp *interp,
  110. ItclClass *iclsPtr);
  111. /* 33 */
  112. ITCLAPI Tcl_Namespace * Itcl_FindClassNamespace(Tcl_Interp *interp,
  113. const char *path);
  114. /* 34 */
  115. ITCLAPI int Itcl_HandleClass(ClientData clientData,
  116. Tcl_Interp *interp, int objc,
  117. Tcl_Obj *const objv[]);
  118. /* Slot 35 is reserved */
  119. /* Slot 36 is reserved */
  120. /* Slot 37 is reserved */
  121. /* 38 */
  122. ITCLAPI void Itcl_BuildVirtualTables(ItclClass *iclsPtr);
  123. /* 39 */
  124. ITCLAPI int Itcl_CreateVariable(Tcl_Interp *interp,
  125. ItclClass *iclsPtr, Tcl_Obj *name,
  126. char *init, char *config,
  127. ItclVariable **ivPtr);
  128. /* 40 */
  129. ITCLAPI void Itcl_DeleteVariable(char *cdata);
  130. /* 41 */
  131. ITCLAPI const char * Itcl_GetCommonVar(Tcl_Interp *interp,
  132. const char *name, ItclClass *contextClass);
  133. /* Slot 42 is reserved */
  134. /* Slot 43 is reserved */
  135. /* 44 */
  136. ITCLAPI int Itcl_CreateObject(Tcl_Interp *interp,
  137. const char*name, ItclClass *iclsPtr,
  138. int objc, Tcl_Obj *const objv[],
  139. ItclObject **rioPtr);
  140. /* 45 */
  141. ITCLAPI int Itcl_DeleteObject(Tcl_Interp *interp,
  142. ItclObject *contextObj);
  143. /* 46 */
  144. ITCLAPI int Itcl_DestructObject(Tcl_Interp *interp,
  145. ItclObject *contextObj, int flags);
  146. /* Slot 47 is reserved */
  147. /* 48 */
  148. ITCLAPI const char * Itcl_GetInstanceVar(Tcl_Interp *interp,
  149. const char *name, ItclObject *contextIoPtr,
  150. ItclClass *contextIclsPtr);
  151. /* Slot 49 is reserved */
  152. /* 50 */
  153. ITCLAPI int Itcl_BodyCmd(ClientData dummy, Tcl_Interp *interp,
  154. int objc, Tcl_Obj *const objv[]);
  155. /* 51 */
  156. ITCLAPI int Itcl_ConfigBodyCmd(ClientData dummy,
  157. Tcl_Interp *interp, int objc,
  158. Tcl_Obj *const objv[]);
  159. /* 52 */
  160. ITCLAPI int Itcl_CreateMethod(Tcl_Interp *interp,
  161. ItclClass *iclsPtr, Tcl_Obj *namePtr,
  162. const char *arglist, const char *body);
  163. /* 53 */
  164. ITCLAPI int Itcl_CreateProc(Tcl_Interp *interp,
  165. ItclClass *iclsPtr, Tcl_Obj *namePtr,
  166. const char *arglist, const char *body);
  167. /* 54 */
  168. ITCLAPI int Itcl_CreateMemberFunc(Tcl_Interp *interp,
  169. ItclClass *iclsPtr, Tcl_Obj *name,
  170. const char *arglist, const char *body,
  171. ItclMemberFunc **mfuncPtr);
  172. /* 55 */
  173. ITCLAPI int Itcl_ChangeMemberFunc(Tcl_Interp *interp,
  174. ItclMemberFunc *mfunc, const char *arglist,
  175. const char *body);
  176. /* 56 */
  177. ITCLAPI void Itcl_DeleteMemberFunc(void *cdata);
  178. /* 57 */
  179. ITCLAPI int Itcl_CreateMemberCode(Tcl_Interp *interp,
  180. ItclClass *iclsPtr, const char *arglist,
  181. const char *body, ItclMemberCode **mcodePtr);
  182. /* 58 */
  183. ITCLAPI void Itcl_DeleteMemberCode(void *cdata);
  184. /* 59 */
  185. ITCLAPI int Itcl_GetMemberCode(Tcl_Interp *interp,
  186. ItclMemberFunc *mfunc);
  187. /* Slot 60 is reserved */
  188. /* 61 */
  189. ITCLAPI int Itcl_EvalMemberCode(Tcl_Interp *interp,
  190. ItclMemberFunc *mfunc,
  191. ItclObject *contextObj, int objc,
  192. Tcl_Obj *const objv[]);
  193. /* Slot 62 is reserved */
  194. /* Slot 63 is reserved */
  195. /* Slot 64 is reserved */
  196. /* Slot 65 is reserved */
  197. /* Slot 66 is reserved */
  198. /* 67 */
  199. ITCLAPI void Itcl_GetMemberFuncUsage(ItclMemberFunc *mfunc,
  200. ItclObject *contextObj, Tcl_Obj *objPtr);
  201. /* 68 */
  202. ITCLAPI int Itcl_ExecMethod(ClientData clientData,
  203. Tcl_Interp *interp, int objc,
  204. Tcl_Obj *const objv[]);
  205. /* 69 */
  206. ITCLAPI int Itcl_ExecProc(ClientData clientData,
  207. Tcl_Interp *interp, int objc,
  208. Tcl_Obj *const objv[]);
  209. /* Slot 70 is reserved */
  210. /* 71 */
  211. ITCLAPI int Itcl_ConstructBase(Tcl_Interp *interp,
  212. ItclObject *contextObj,
  213. ItclClass *contextClass);
  214. /* 72 */
  215. ITCLAPI int Itcl_InvokeMethodIfExists(Tcl_Interp *interp,
  216. const char *name, ItclClass *contextClass,
  217. ItclObject *contextObj, int objc,
  218. Tcl_Obj *const objv[]);
  219. /* Slot 73 is reserved */
  220. /* 74 */
  221. ITCLAPI int Itcl_ReportFuncErrors(Tcl_Interp *interp,
  222. ItclMemberFunc *mfunc,
  223. ItclObject *contextObj, int result);
  224. /* 75 */
  225. ITCLAPI int Itcl_ParseInit(Tcl_Interp *interp,
  226. ItclObjectInfo *info);
  227. /* 76 */
  228. ITCLAPI int Itcl_ClassCmd(ClientData clientData,
  229. Tcl_Interp *interp, int objc,
  230. Tcl_Obj *const objv[]);
  231. /* 77 */
  232. ITCLAPI int Itcl_ClassInheritCmd(ClientData clientData,
  233. Tcl_Interp *interp, int objc,
  234. Tcl_Obj *const objv[]);
  235. /* 78 */
  236. ITCLAPI int Itcl_ClassProtectionCmd(ClientData clientData,
  237. Tcl_Interp *interp, int objc,
  238. Tcl_Obj *const objv[]);
  239. /* 79 */
  240. ITCLAPI int Itcl_ClassConstructorCmd(ClientData clientData,
  241. Tcl_Interp *interp, int objc,
  242. Tcl_Obj *const objv[]);
  243. /* 80 */
  244. ITCLAPI int Itcl_ClassDestructorCmd(ClientData clientData,
  245. Tcl_Interp *interp, int objc,
  246. Tcl_Obj *const objv[]);
  247. /* 81 */
  248. ITCLAPI int Itcl_ClassMethodCmd(ClientData clientData,
  249. Tcl_Interp *interp, int objc,
  250. Tcl_Obj *const objv[]);
  251. /* 82 */
  252. ITCLAPI int Itcl_ClassProcCmd(ClientData clientData,
  253. Tcl_Interp *interp, int objc,
  254. Tcl_Obj *const objv[]);
  255. /* 83 */
  256. ITCLAPI int Itcl_ClassVariableCmd(ClientData clientData,
  257. Tcl_Interp *interp, int objc,
  258. Tcl_Obj *const objv[]);
  259. /* 84 */
  260. ITCLAPI int Itcl_ClassCommonCmd(ClientData clientData,
  261. Tcl_Interp *interp, int objc,
  262. Tcl_Obj *const objv[]);
  263. /* 85 */
  264. ITCLAPI int Itcl_ParseVarResolver(Tcl_Interp *interp,
  265. const char *name, Tcl_Namespace *contextNs,
  266. int flags, Tcl_Var *rPtr);
  267. /* 86 */
  268. ITCLAPI int Itcl_BiInit(Tcl_Interp *interp,
  269. ItclObjectInfo *infoPtr);
  270. /* 87 */
  271. ITCLAPI int Itcl_InstallBiMethods(Tcl_Interp *interp,
  272. ItclClass *cdefn);
  273. /* 88 */
  274. ITCLAPI int Itcl_BiIsaCmd(ClientData clientData,
  275. Tcl_Interp *interp, int objc,
  276. Tcl_Obj *const objv[]);
  277. /* 89 */
  278. ITCLAPI int Itcl_BiConfigureCmd(ClientData clientData,
  279. Tcl_Interp *interp, int objc,
  280. Tcl_Obj *const objv[]);
  281. /* 90 */
  282. ITCLAPI int Itcl_BiCgetCmd(ClientData clientData,
  283. Tcl_Interp *interp, int objc,
  284. Tcl_Obj *const objv[]);
  285. /* 91 */
  286. ITCLAPI int Itcl_BiChainCmd(ClientData dummy, Tcl_Interp *interp,
  287. int objc, Tcl_Obj *const objv[]);
  288. /* 92 */
  289. ITCLAPI int Itcl_BiInfoClassCmd(ClientData dummy,
  290. Tcl_Interp *interp, int objc,
  291. Tcl_Obj *const objv[]);
  292. /* 93 */
  293. ITCLAPI int Itcl_BiInfoInheritCmd(ClientData dummy,
  294. Tcl_Interp *interp, int objc,
  295. Tcl_Obj *const objv[]);
  296. /* 94 */
  297. ITCLAPI int Itcl_BiInfoHeritageCmd(ClientData dummy,
  298. Tcl_Interp *interp, int objc,
  299. Tcl_Obj *const objv[]);
  300. /* 95 */
  301. ITCLAPI int Itcl_BiInfoFunctionCmd(ClientData dummy,
  302. Tcl_Interp *interp, int objc,
  303. Tcl_Obj *const objv[]);
  304. /* 96 */
  305. ITCLAPI int Itcl_BiInfoVariableCmd(ClientData dummy,
  306. Tcl_Interp *interp, int objc,
  307. Tcl_Obj *const objv[]);
  308. /* 97 */
  309. ITCLAPI int Itcl_BiInfoBodyCmd(ClientData dummy,
  310. Tcl_Interp *interp, int objc,
  311. Tcl_Obj *const objv[]);
  312. /* 98 */
  313. ITCLAPI int Itcl_BiInfoArgsCmd(ClientData dummy,
  314. Tcl_Interp *interp, int objc,
  315. Tcl_Obj *const objv[]);
  316. /* Slot 99 is reserved */
  317. /* 100 */
  318. ITCLAPI int Itcl_EnsembleInit(Tcl_Interp *interp);
  319. /* 101 */
  320. ITCLAPI int Itcl_CreateEnsemble(Tcl_Interp *interp,
  321. const char *ensName);
  322. /* 102 */
  323. ITCLAPI int Itcl_AddEnsemblePart(Tcl_Interp *interp,
  324. const char *ensName, const char *partName,
  325. const char *usageInfo,
  326. Tcl_ObjCmdProc *objProc,
  327. ClientData clientData,
  328. Tcl_CmdDeleteProc *deleteProc);
  329. /* 103 */
  330. ITCLAPI int Itcl_GetEnsemblePart(Tcl_Interp *interp,
  331. const char *ensName, const char *partName,
  332. Tcl_CmdInfo *infoPtr);
  333. /* 104 */
  334. ITCLAPI int Itcl_IsEnsemble(Tcl_CmdInfo *infoPtr);
  335. /* 105 */
  336. ITCLAPI int Itcl_GetEnsembleUsage(Tcl_Interp *interp,
  337. const char *ensName, Tcl_Obj *objPtr);
  338. /* 106 */
  339. ITCLAPI int Itcl_GetEnsembleUsageForObj(Tcl_Interp *interp,
  340. Tcl_Obj *ensObjPtr, Tcl_Obj *objPtr);
  341. /* 107 */
  342. ITCLAPI int Itcl_EnsembleCmd(ClientData clientData,
  343. Tcl_Interp *interp, int objc,
  344. Tcl_Obj *const objv[]);
  345. /* 108 */
  346. ITCLAPI int Itcl_EnsPartCmd(ClientData clientData,
  347. Tcl_Interp *interp, int objc,
  348. Tcl_Obj *const objv[]);
  349. /* 109 */
  350. ITCLAPI int Itcl_EnsembleErrorCmd(ClientData clientData,
  351. Tcl_Interp *interp, int objc,
  352. Tcl_Obj *const objv[]);
  353. /* Slot 110 is reserved */
  354. /* Slot 111 is reserved */
  355. /* Slot 112 is reserved */
  356. /* Slot 113 is reserved */
  357. /* Slot 114 is reserved */
  358. /* 115 */
  359. ITCLAPI void Itcl_Assert(const char *testExpr,
  360. const char *fileName, int lineNum);
  361. /* 116 */
  362. ITCLAPI int Itcl_IsObjectCmd(ClientData clientData,
  363. Tcl_Interp *interp, int objc,
  364. Tcl_Obj *const objv[]);
  365. /* 117 */
  366. ITCLAPI int Itcl_IsClassCmd(ClientData clientData,
  367. Tcl_Interp *interp, int objc,
  368. Tcl_Obj *const objv[]);
  369. /* Slot 118 is reserved */
  370. /* Slot 119 is reserved */
  371. /* Slot 120 is reserved */
  372. /* Slot 121 is reserved */
  373. /* Slot 122 is reserved */
  374. /* Slot 123 is reserved */
  375. /* Slot 124 is reserved */
  376. /* Slot 125 is reserved */
  377. /* Slot 126 is reserved */
  378. /* Slot 127 is reserved */
  379. /* Slot 128 is reserved */
  380. /* Slot 129 is reserved */
  381. /* Slot 130 is reserved */
  382. /* Slot 131 is reserved */
  383. /* Slot 132 is reserved */
  384. /* Slot 133 is reserved */
  385. /* Slot 134 is reserved */
  386. /* Slot 135 is reserved */
  387. /* Slot 136 is reserved */
  388. /* Slot 137 is reserved */
  389. /* Slot 138 is reserved */
  390. /* Slot 139 is reserved */
  391. /* 140 */
  392. ITCLAPI int Itcl_FilterAddCmd(ClientData clientData,
  393. Tcl_Interp *interp, int objc,
  394. Tcl_Obj *const objv[]);
  395. /* 141 */
  396. ITCLAPI int Itcl_FilterDeleteCmd(ClientData clientData,
  397. Tcl_Interp *interp, int objc,
  398. Tcl_Obj *const objv[]);
  399. /* 142 */
  400. ITCLAPI int Itcl_ForwardAddCmd(ClientData clientData,
  401. Tcl_Interp *interp, int objc,
  402. Tcl_Obj *const objv[]);
  403. /* 143 */
  404. ITCLAPI int Itcl_ForwardDeleteCmd(ClientData clientData,
  405. Tcl_Interp *interp, int objc,
  406. Tcl_Obj *const objv[]);
  407. /* 144 */
  408. ITCLAPI int Itcl_MixinAddCmd(ClientData clientData,
  409. Tcl_Interp *interp, int objc,
  410. Tcl_Obj *const objv[]);
  411. /* 145 */
  412. ITCLAPI int Itcl_MixinDeleteCmd(ClientData clientData,
  413. Tcl_Interp *interp, int objc,
  414. Tcl_Obj *const objv[]);
  415. /* Slot 146 is reserved */
  416. /* Slot 147 is reserved */
  417. /* Slot 148 is reserved */
  418. /* Slot 149 is reserved */
  419. /* Slot 150 is reserved */
  420. /* 151 */
  421. ITCLAPI int Itcl_BiInfoUnknownCmd(ClientData dummy,
  422. Tcl_Interp *interp, int objc,
  423. Tcl_Obj *const objv[]);
  424. /* 152 */
  425. ITCLAPI int Itcl_BiInfoVarsCmd(ClientData dummy,
  426. Tcl_Interp *interp, int objc,
  427. Tcl_Obj *const objv[]);
  428. /* 153 */
  429. ITCLAPI int Itcl_CanAccess2(ItclClass *iclsPtr, int protection,
  430. Tcl_Namespace *fromNsPtr);
  431. /* Slot 154 is reserved */
  432. /* Slot 155 is reserved */
  433. /* Slot 156 is reserved */
  434. /* Slot 157 is reserved */
  435. /* Slot 158 is reserved */
  436. /* Slot 159 is reserved */
  437. /* 160 */
  438. ITCLAPI int Itcl_SetCallFrameResolver(Tcl_Interp *interp,
  439. Tcl_Resolve *resolvePtr);
  440. /* 161 */
  441. ITCLAPI int ItclEnsembleSubCmd(ClientData clientData,
  442. Tcl_Interp *interp, const char *ensembleName,
  443. int objc, Tcl_Obj *const *objv,
  444. const char *functionName);
  445. /* 162 */
  446. ITCLAPI Tcl_Namespace * Itcl_GetUplevelNamespace(Tcl_Interp *interp,
  447. int level);
  448. /* 163 */
  449. ITCLAPI ClientData Itcl_GetCallFrameClientData(Tcl_Interp *interp);
  450. /* Slot 164 is reserved */
  451. /* 165 */
  452. ITCLAPI int Itcl_SetCallFrameNamespace(Tcl_Interp *interp,
  453. Tcl_Namespace *nsPtr);
  454. /* 166 */
  455. ITCLAPI int Itcl_GetCallFrameObjc(Tcl_Interp *interp);
  456. /* 167 */
  457. ITCLAPI Tcl_Obj *const * Itcl_GetCallFrameObjv(Tcl_Interp *interp);
  458. /* 168 */
  459. ITCLAPI int Itcl_NWidgetCmd(ClientData infoPtr,
  460. Tcl_Interp *interp, int objc,
  461. Tcl_Obj *const objv[]);
  462. /* 169 */
  463. ITCLAPI int Itcl_AddOptionCmd(ClientData infoPtr,
  464. Tcl_Interp *interp, int objc,
  465. Tcl_Obj *const objv[]);
  466. /* 170 */
  467. ITCLAPI int Itcl_AddComponentCmd(ClientData infoPtr,
  468. Tcl_Interp *interp, int objc,
  469. Tcl_Obj *const objv[]);
  470. /* 171 */
  471. ITCLAPI int Itcl_BiInfoOptionCmd(ClientData dummy,
  472. Tcl_Interp *interp, int objc,
  473. Tcl_Obj *const objv[]);
  474. /* 172 */
  475. ITCLAPI int Itcl_BiInfoComponentCmd(ClientData dummy,
  476. Tcl_Interp *interp, int objc,
  477. Tcl_Obj *const objv[]);
  478. /* 173 */
  479. ITCLAPI int Itcl_RenameCommand(Tcl_Interp *interp,
  480. const char *oldName, const char *newName);
  481. /* 174 */
  482. ITCLAPI int Itcl_PushCallFrame(Tcl_Interp *interp,
  483. Tcl_CallFrame *framePtr,
  484. Tcl_Namespace *nsPtr, int isProcCallFrame);
  485. /* 175 */
  486. ITCLAPI void Itcl_PopCallFrame(Tcl_Interp *interp);
  487. /* 176 */
  488. ITCLAPI Tcl_CallFrame * Itcl_GetUplevelCallFrame(Tcl_Interp *interp,
  489. int level);
  490. /* 177 */
  491. ITCLAPI Tcl_CallFrame * Itcl_ActivateCallFrame(Tcl_Interp *interp,
  492. Tcl_CallFrame *framePtr);
  493. /* 178 */
  494. ITCLAPI const char* ItclSetInstanceVar(Tcl_Interp *interp,
  495. const char *name, const char *name2,
  496. const char *value, ItclObject *contextIoPtr,
  497. ItclClass *contextIclsPtr);
  498. /* 179 */
  499. ITCLAPI Tcl_Obj * ItclCapitalize(const char *str);
  500. /* 180 */
  501. ITCLAPI int ItclClassBaseCmd(ClientData clientData,
  502. Tcl_Interp *interp, int flags, int objc,
  503. Tcl_Obj *const objv[],
  504. ItclClass **iclsPtrPtr);
  505. /* 181 */
  506. ITCLAPI int ItclCreateComponent(Tcl_Interp *interp,
  507. ItclClass *iclsPtr, Tcl_Obj *componentPtr,
  508. int type, ItclComponent **icPtrPtr);
  509. /* 182 */
  510. ITCLAPI void Itcl_SetContext(Tcl_Interp *interp,
  511. ItclObject *ioPtr);
  512. /* 183 */
  513. ITCLAPI void Itcl_UnsetContext(Tcl_Interp *interp);
  514. /* 184 */
  515. ITCLAPI const char * ItclGetInstanceVar(Tcl_Interp *interp,
  516. const char *name, const char *name2,
  517. ItclObject *ioPtr, ItclClass *iclsPtr);
  518. typedef struct ItclIntStubs {
  519. int magic;
  520. int epoch;
  521. int revision;
  522. void *hooks;
  523. int (*itcl_IsClassNamespace) (Tcl_Namespace *namesp); /* 0 */
  524. int (*itcl_IsClass) (Tcl_Command cmd); /* 1 */
  525. ItclClass * (*itcl_FindClass) (Tcl_Interp *interp, const char *path, int autoload); /* 2 */
  526. int (*itcl_FindObject) (Tcl_Interp *interp, const char *name, ItclObject **roPtr); /* 3 */
  527. int (*itcl_IsObject) (Tcl_Command cmd); /* 4 */
  528. int (*itcl_ObjectIsa) (ItclObject *contextObj, ItclClass *cdefn); /* 5 */
  529. int (*itcl_Protection) (Tcl_Interp *interp, int newLevel); /* 6 */
  530. const char * (*itcl_ProtectionStr) (int pLevel); /* 7 */
  531. int (*itcl_CanAccess) (ItclMemberFunc *memberPtr, Tcl_Namespace *fromNsPtr); /* 8 */
  532. int (*itcl_CanAccessFunc) (ItclMemberFunc *mfunc, Tcl_Namespace *fromNsPtr); /* 9 */
  533. void (*reserved10)(void);
  534. void (*itcl_ParseNamespPath) (const char *name, Tcl_DString *buffer, const char **head, const char **tail); /* 11 */
  535. int (*itcl_DecodeScopedCommand) (Tcl_Interp *interp, const char *name, Tcl_Namespace **rNsPtr, char **rCmdPtr); /* 12 */
  536. int (*itcl_EvalArgs) (Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 13 */
  537. Tcl_Obj * (*itcl_CreateArgs) (Tcl_Interp *interp, const char *string, int objc, Tcl_Obj *const objv[]); /* 14 */
  538. void (*reserved15)(void);
  539. void (*reserved16)(void);
  540. int (*itcl_GetContext) (Tcl_Interp *interp, ItclClass **iclsPtrPtr, ItclObject **ioPtrPtr); /* 17 */
  541. void (*itcl_InitHierIter) (ItclHierIter *iter, ItclClass *iclsPtr); /* 18 */
  542. void (*itcl_DeleteHierIter) (ItclHierIter *iter); /* 19 */
  543. ItclClass * (*itcl_AdvanceHierIter) (ItclHierIter *iter); /* 20 */
  544. int (*itcl_FindClassesCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 21 */
  545. int (*itcl_FindObjectsCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 22 */
  546. void (*reserved23)(void);
  547. int (*itcl_DelClassCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 24 */
  548. int (*itcl_DelObjectCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 25 */
  549. int (*itcl_ScopeCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 26 */
  550. int (*itcl_CodeCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 27 */
  551. int (*itcl_StubCreateCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 28 */
  552. int (*itcl_StubExistsCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 29 */
  553. int (*itcl_IsStub) (Tcl_Command cmd); /* 30 */
  554. int (*itcl_CreateClass) (Tcl_Interp *interp, const char *path, ItclObjectInfo *info, ItclClass **rPtr); /* 31 */
  555. int (*itcl_DeleteClass) (Tcl_Interp *interp, ItclClass *iclsPtr); /* 32 */
  556. Tcl_Namespace * (*itcl_FindClassNamespace) (Tcl_Interp *interp, const char *path); /* 33 */
  557. int (*itcl_HandleClass) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 34 */
  558. void (*reserved35)(void);
  559. void (*reserved36)(void);
  560. void (*reserved37)(void);
  561. void (*itcl_BuildVirtualTables) (ItclClass *iclsPtr); /* 38 */
  562. int (*itcl_CreateVariable) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *name, char *init, char *config, ItclVariable **ivPtr); /* 39 */
  563. void (*itcl_DeleteVariable) (char *cdata); /* 40 */
  564. const char * (*itcl_GetCommonVar) (Tcl_Interp *interp, const char *name, ItclClass *contextClass); /* 41 */
  565. void (*reserved42)(void);
  566. void (*reserved43)(void);
  567. int (*itcl_CreateObject) (Tcl_Interp *interp, const char*name, ItclClass *iclsPtr, int objc, Tcl_Obj *const objv[], ItclObject **rioPtr); /* 44 */
  568. int (*itcl_DeleteObject) (Tcl_Interp *interp, ItclObject *contextObj); /* 45 */
  569. int (*itcl_DestructObject) (Tcl_Interp *interp, ItclObject *contextObj, int flags); /* 46 */
  570. void (*reserved47)(void);
  571. const char * (*itcl_GetInstanceVar) (Tcl_Interp *interp, const char *name, ItclObject *contextIoPtr, ItclClass *contextIclsPtr); /* 48 */
  572. void (*reserved49)(void);
  573. int (*itcl_BodyCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 50 */
  574. int (*itcl_ConfigBodyCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 51 */
  575. int (*itcl_CreateMethod) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *namePtr, const char *arglist, const char *body); /* 52 */
  576. int (*itcl_CreateProc) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *namePtr, const char *arglist, const char *body); /* 53 */
  577. int (*itcl_CreateMemberFunc) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *name, const char *arglist, const char *body, ItclMemberFunc **mfuncPtr); /* 54 */
  578. int (*itcl_ChangeMemberFunc) (Tcl_Interp *interp, ItclMemberFunc *mfunc, const char *arglist, const char *body); /* 55 */
  579. void (*itcl_DeleteMemberFunc) (void *cdata); /* 56 */
  580. int (*itcl_CreateMemberCode) (Tcl_Interp *interp, ItclClass *iclsPtr, const char *arglist, const char *body, ItclMemberCode **mcodePtr); /* 57 */
  581. void (*itcl_DeleteMemberCode) (void *cdata); /* 58 */
  582. int (*itcl_GetMemberCode) (Tcl_Interp *interp, ItclMemberFunc *mfunc); /* 59 */
  583. void (*reserved60)(void);
  584. int (*itcl_EvalMemberCode) (Tcl_Interp *interp, ItclMemberFunc *mfunc, ItclObject *contextObj, int objc, Tcl_Obj *const objv[]); /* 61 */
  585. void (*reserved62)(void);
  586. void (*reserved63)(void);
  587. void (*reserved64)(void);
  588. void (*reserved65)(void);
  589. void (*reserved66)(void);
  590. void (*itcl_GetMemberFuncUsage) (ItclMemberFunc *mfunc, ItclObject *contextObj, Tcl_Obj *objPtr); /* 67 */
  591. int (*itcl_ExecMethod) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 68 */
  592. int (*itcl_ExecProc) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 69 */
  593. void (*reserved70)(void);
  594. int (*itcl_ConstructBase) (Tcl_Interp *interp, ItclObject *contextObj, ItclClass *contextClass); /* 71 */
  595. int (*itcl_InvokeMethodIfExists) (Tcl_Interp *interp, const char *name, ItclClass *contextClass, ItclObject *contextObj, int objc, Tcl_Obj *const objv[]); /* 72 */
  596. void (*reserved73)(void);
  597. int (*itcl_ReportFuncErrors) (Tcl_Interp *interp, ItclMemberFunc *mfunc, ItclObject *contextObj, int result); /* 74 */
  598. int (*itcl_ParseInit) (Tcl_Interp *interp, ItclObjectInfo *info); /* 75 */
  599. int (*itcl_ClassCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 76 */
  600. int (*itcl_ClassInheritCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 77 */
  601. int (*itcl_ClassProtectionCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 78 */
  602. int (*itcl_ClassConstructorCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 79 */
  603. int (*itcl_ClassDestructorCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 80 */
  604. int (*itcl_ClassMethodCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 81 */
  605. int (*itcl_ClassProcCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 82 */
  606. int (*itcl_ClassVariableCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 83 */
  607. int (*itcl_ClassCommonCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 84 */
  608. int (*itcl_ParseVarResolver) (Tcl_Interp *interp, const char *name, Tcl_Namespace *contextNs, int flags, Tcl_Var *rPtr); /* 85 */
  609. int (*itcl_BiInit) (Tcl_Interp *interp, ItclObjectInfo *infoPtr); /* 86 */
  610. int (*itcl_InstallBiMethods) (Tcl_Interp *interp, ItclClass *cdefn); /* 87 */
  611. int (*itcl_BiIsaCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 88 */
  612. int (*itcl_BiConfigureCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 89 */
  613. int (*itcl_BiCgetCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 90 */
  614. int (*itcl_BiChainCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 91 */
  615. int (*itcl_BiInfoClassCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 92 */
  616. int (*itcl_BiInfoInheritCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 93 */
  617. int (*itcl_BiInfoHeritageCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 94 */
  618. int (*itcl_BiInfoFunctionCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 95 */
  619. int (*itcl_BiInfoVariableCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 96 */
  620. int (*itcl_BiInfoBodyCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 97 */
  621. int (*itcl_BiInfoArgsCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 98 */
  622. void (*reserved99)(void);
  623. int (*itcl_EnsembleInit) (Tcl_Interp *interp); /* 100 */
  624. int (*itcl_CreateEnsemble) (Tcl_Interp *interp, const char *ensName); /* 101 */
  625. int (*itcl_AddEnsemblePart) (Tcl_Interp *interp, const char *ensName, const char *partName, const char *usageInfo, Tcl_ObjCmdProc *objProc, ClientData clientData, Tcl_CmdDeleteProc *deleteProc); /* 102 */
  626. int (*itcl_GetEnsemblePart) (Tcl_Interp *interp, const char *ensName, const char *partName, Tcl_CmdInfo *infoPtr); /* 103 */
  627. int (*itcl_IsEnsemble) (Tcl_CmdInfo *infoPtr); /* 104 */
  628. int (*itcl_GetEnsembleUsage) (Tcl_Interp *interp, const char *ensName, Tcl_Obj *objPtr); /* 105 */
  629. int (*itcl_GetEnsembleUsageForObj) (Tcl_Interp *interp, Tcl_Obj *ensObjPtr, Tcl_Obj *objPtr); /* 106 */
  630. int (*itcl_EnsembleCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 107 */
  631. int (*itcl_EnsPartCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 108 */
  632. int (*itcl_EnsembleErrorCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 109 */
  633. void (*reserved110)(void);
  634. void (*reserved111)(void);
  635. void (*reserved112)(void);
  636. void (*reserved113)(void);
  637. void (*reserved114)(void);
  638. void (*itcl_Assert) (const char *testExpr, const char *fileName, int lineNum); /* 115 */
  639. int (*itcl_IsObjectCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 116 */
  640. int (*itcl_IsClassCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 117 */
  641. void (*reserved118)(void);
  642. void (*reserved119)(void);
  643. void (*reserved120)(void);
  644. void (*reserved121)(void);
  645. void (*reserved122)(void);
  646. void (*reserved123)(void);
  647. void (*reserved124)(void);
  648. void (*reserved125)(void);
  649. void (*reserved126)(void);
  650. void (*reserved127)(void);
  651. void (*reserved128)(void);
  652. void (*reserved129)(void);
  653. void (*reserved130)(void);
  654. void (*reserved131)(void);
  655. void (*reserved132)(void);
  656. void (*reserved133)(void);
  657. void (*reserved134)(void);
  658. void (*reserved135)(void);
  659. void (*reserved136)(void);
  660. void (*reserved137)(void);
  661. void (*reserved138)(void);
  662. void (*reserved139)(void);
  663. int (*itcl_FilterAddCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 140 */
  664. int (*itcl_FilterDeleteCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 141 */
  665. int (*itcl_ForwardAddCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 142 */
  666. int (*itcl_ForwardDeleteCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 143 */
  667. int (*itcl_MixinAddCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 144 */
  668. int (*itcl_MixinDeleteCmd) (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 145 */
  669. void (*reserved146)(void);
  670. void (*reserved147)(void);
  671. void (*reserved148)(void);
  672. void (*reserved149)(void);
  673. void (*reserved150)(void);
  674. int (*itcl_BiInfoUnknownCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 151 */
  675. int (*itcl_BiInfoVarsCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 152 */
  676. int (*itcl_CanAccess2) (ItclClass *iclsPtr, int protection, Tcl_Namespace *fromNsPtr); /* 153 */
  677. void (*reserved154)(void);
  678. void (*reserved155)(void);
  679. void (*reserved156)(void);
  680. void (*reserved157)(void);
  681. void (*reserved158)(void);
  682. void (*reserved159)(void);
  683. int (*itcl_SetCallFrameResolver) (Tcl_Interp *interp, Tcl_Resolve *resolvePtr); /* 160 */
  684. int (*itclEnsembleSubCmd) (ClientData clientData, Tcl_Interp *interp, const char *ensembleName, int objc, Tcl_Obj *const *objv, const char *functionName); /* 161 */
  685. Tcl_Namespace * (*itcl_GetUplevelNamespace) (Tcl_Interp *interp, int level); /* 162 */
  686. ClientData (*itcl_GetCallFrameClientData) (Tcl_Interp *interp); /* 163 */
  687. void (*reserved164)(void);
  688. int (*itcl_SetCallFrameNamespace) (Tcl_Interp *interp, Tcl_Namespace *nsPtr); /* 165 */
  689. int (*itcl_GetCallFrameObjc) (Tcl_Interp *interp); /* 166 */
  690. Tcl_Obj *const * (*itcl_GetCallFrameObjv) (Tcl_Interp *interp); /* 167 */
  691. int (*itcl_NWidgetCmd) (ClientData infoPtr, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 168 */
  692. int (*itcl_AddOptionCmd) (ClientData infoPtr, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 169 */
  693. int (*itcl_AddComponentCmd) (ClientData infoPtr, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 170 */
  694. int (*itcl_BiInfoOptionCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 171 */
  695. int (*itcl_BiInfoComponentCmd) (ClientData dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 172 */
  696. int (*itcl_RenameCommand) (Tcl_Interp *interp, const char *oldName, const char *newName); /* 173 */
  697. int (*itcl_PushCallFrame) (Tcl_Interp *interp, Tcl_CallFrame *framePtr, Tcl_Namespace *nsPtr, int isProcCallFrame); /* 174 */
  698. void (*itcl_PopCallFrame) (Tcl_Interp *interp); /* 175 */
  699. Tcl_CallFrame * (*itcl_GetUplevelCallFrame) (Tcl_Interp *interp, int level); /* 176 */
  700. Tcl_CallFrame * (*itcl_ActivateCallFrame) (Tcl_Interp *interp, Tcl_CallFrame *framePtr); /* 177 */
  701. const char* (*itclSetInstanceVar) (Tcl_Interp *interp, const char *name, const char *name2, const char *value, ItclObject *contextIoPtr, ItclClass *contextIclsPtr); /* 178 */
  702. Tcl_Obj * (*itclCapitalize) (const char *str); /* 179 */
  703. int (*itclClassBaseCmd) (ClientData clientData, Tcl_Interp *interp, int flags, int objc, Tcl_Obj *const objv[], ItclClass **iclsPtrPtr); /* 180 */
  704. int (*itclCreateComponent) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *componentPtr, int type, ItclComponent **icPtrPtr); /* 181 */
  705. void (*itcl_SetContext) (Tcl_Interp *interp, ItclObject *ioPtr); /* 182 */
  706. void (*itcl_UnsetContext) (Tcl_Interp *interp); /* 183 */
  707. const char * (*itclGetInstanceVar) (Tcl_Interp *interp, const char *name, const char *name2, ItclObject *ioPtr, ItclClass *iclsPtr); /* 184 */
  708. } ItclIntStubs;
  709. extern const ItclIntStubs *itclIntStubsPtr;
  710. #ifdef __cplusplus
  711. }
  712. #endif
  713. #if defined(USE_ITCL_STUBS)
  714. /*
  715. * Inline function declarations:
  716. */
  717. #define Itcl_IsClassNamespace \
  718. (itclIntStubsPtr->itcl_IsClassNamespace) /* 0 */
  719. #define Itcl_IsClass \
  720. (itclIntStubsPtr->itcl_IsClass) /* 1 */
  721. #define Itcl_FindClass \
  722. (itclIntStubsPtr->itcl_FindClass) /* 2 */
  723. #define Itcl_FindObject \
  724. (itclIntStubsPtr->itcl_FindObject) /* 3 */
  725. #define Itcl_IsObject \
  726. (itclIntStubsPtr->itcl_IsObject) /* 4 */
  727. #define Itcl_ObjectIsa \
  728. (itclIntStubsPtr->itcl_ObjectIsa) /* 5 */
  729. #define Itcl_Protection \
  730. (itclIntStubsPtr->itcl_Protection) /* 6 */
  731. #define Itcl_ProtectionStr \
  732. (itclIntStubsPtr->itcl_ProtectionStr) /* 7 */
  733. #define Itcl_CanAccess \
  734. (itclIntStubsPtr->itcl_CanAccess) /* 8 */
  735. #define Itcl_CanAccessFunc \
  736. (itclIntStubsPtr->itcl_CanAccessFunc) /* 9 */
  737. /* Slot 10 is reserved */
  738. #define Itcl_ParseNamespPath \
  739. (itclIntStubsPtr->itcl_ParseNamespPath) /* 11 */
  740. #define Itcl_DecodeScopedCommand \
  741. (itclIntStubsPtr->itcl_DecodeScopedCommand) /* 12 */
  742. #define Itcl_EvalArgs \
  743. (itclIntStubsPtr->itcl_EvalArgs) /* 13 */
  744. #define Itcl_CreateArgs \
  745. (itclIntStubsPtr->itcl_CreateArgs) /* 14 */
  746. /* Slot 15 is reserved */
  747. /* Slot 16 is reserved */
  748. #define Itcl_GetContext \
  749. (itclIntStubsPtr->itcl_GetContext) /* 17 */
  750. #define Itcl_InitHierIter \
  751. (itclIntStubsPtr->itcl_InitHierIter) /* 18 */
  752. #define Itcl_DeleteHierIter \
  753. (itclIntStubsPtr->itcl_DeleteHierIter) /* 19 */
  754. #define Itcl_AdvanceHierIter \
  755. (itclIntStubsPtr->itcl_AdvanceHierIter) /* 20 */
  756. #define Itcl_FindClassesCmd \
  757. (itclIntStubsPtr->itcl_FindClassesCmd) /* 21 */
  758. #define Itcl_FindObjectsCmd \
  759. (itclIntStubsPtr->itcl_FindObjectsCmd) /* 22 */
  760. /* Slot 23 is reserved */
  761. #define Itcl_DelClassCmd \
  762. (itclIntStubsPtr->itcl_DelClassCmd) /* 24 */
  763. #define Itcl_DelObjectCmd \
  764. (itclIntStubsPtr->itcl_DelObjectCmd) /* 25 */
  765. #define Itcl_ScopeCmd \
  766. (itclIntStubsPtr->itcl_ScopeCmd) /* 26 */
  767. #define Itcl_CodeCmd \
  768. (itclIntStubsPtr->itcl_CodeCmd) /* 27 */
  769. #define Itcl_StubCreateCmd \
  770. (itclIntStubsPtr->itcl_StubCreateCmd) /* 28 */
  771. #define Itcl_StubExistsCmd \
  772. (itclIntStubsPtr->itcl_StubExistsCmd) /* 29 */
  773. #define Itcl_IsStub \
  774. (itclIntStubsPtr->itcl_IsStub) /* 30 */
  775. #define Itcl_CreateClass \
  776. (itclIntStubsPtr->itcl_CreateClass) /* 31 */
  777. #define Itcl_DeleteClass \
  778. (itclIntStubsPtr->itcl_DeleteClass) /* 32 */
  779. #define Itcl_FindClassNamespace \
  780. (itclIntStubsPtr->itcl_FindClassNamespace) /* 33 */
  781. #define Itcl_HandleClass \
  782. (itclIntStubsPtr->itcl_HandleClass) /* 34 */
  783. /* Slot 35 is reserved */
  784. /* Slot 36 is reserved */
  785. /* Slot 37 is reserved */
  786. #define Itcl_BuildVirtualTables \
  787. (itclIntStubsPtr->itcl_BuildVirtualTables) /* 38 */
  788. #define Itcl_CreateVariable \
  789. (itclIntStubsPtr->itcl_CreateVariable) /* 39 */
  790. #define Itcl_DeleteVariable \
  791. (itclIntStubsPtr->itcl_DeleteVariable) /* 40 */
  792. #define Itcl_GetCommonVar \
  793. (itclIntStubsPtr->itcl_GetCommonVar) /* 41 */
  794. /* Slot 42 is reserved */
  795. /* Slot 43 is reserved */
  796. #define Itcl_CreateObject \
  797. (itclIntStubsPtr->itcl_CreateObject) /* 44 */
  798. #define Itcl_DeleteObject \
  799. (itclIntStubsPtr->itcl_DeleteObject) /* 45 */
  800. #define Itcl_DestructObject \
  801. (itclIntStubsPtr->itcl_DestructObject) /* 46 */
  802. /* Slot 47 is reserved */
  803. #define Itcl_GetInstanceVar \
  804. (itclIntStubsPtr->itcl_GetInstanceVar) /* 48 */
  805. /* Slot 49 is reserved */
  806. #define Itcl_BodyCmd \
  807. (itclIntStubsPtr->itcl_BodyCmd) /* 50 */
  808. #define Itcl_ConfigBodyCmd \
  809. (itclIntStubsPtr->itcl_ConfigBodyCmd) /* 51 */
  810. #define Itcl_CreateMethod \
  811. (itclIntStubsPtr->itcl_CreateMethod) /* 52 */
  812. #define Itcl_CreateProc \
  813. (itclIntStubsPtr->itcl_CreateProc) /* 53 */
  814. #define Itcl_CreateMemberFunc \
  815. (itclIntStubsPtr->itcl_CreateMemberFunc) /* 54 */
  816. #define Itcl_ChangeMemberFunc \
  817. (itclIntStubsPtr->itcl_ChangeMemberFunc) /* 55 */
  818. #define Itcl_DeleteMemberFunc \
  819. (itclIntStubsPtr->itcl_DeleteMemberFunc) /* 56 */
  820. #define Itcl_CreateMemberCode \
  821. (itclIntStubsPtr->itcl_CreateMemberCode) /* 57 */
  822. #define Itcl_DeleteMemberCode \
  823. (itclIntStubsPtr->itcl_DeleteMemberCode) /* 58 */
  824. #define Itcl_GetMemberCode \
  825. (itclIntStubsPtr->itcl_GetMemberCode) /* 59 */
  826. /* Slot 60 is reserved */
  827. #define Itcl_EvalMemberCode \
  828. (itclIntStubsPtr->itcl_EvalMemberCode) /* 61 */
  829. /* Slot 62 is reserved */
  830. /* Slot 63 is reserved */
  831. /* Slot 64 is reserved */
  832. /* Slot 65 is reserved */
  833. /* Slot 66 is reserved */
  834. #define Itcl_GetMemberFuncUsage \
  835. (itclIntStubsPtr->itcl_GetMemberFuncUsage) /* 67 */
  836. #define Itcl_ExecMethod \
  837. (itclIntStubsPtr->itcl_ExecMethod) /* 68 */
  838. #define Itcl_ExecProc \
  839. (itclIntStubsPtr->itcl_ExecProc) /* 69 */
  840. /* Slot 70 is reserved */
  841. #define Itcl_ConstructBase \
  842. (itclIntStubsPtr->itcl_ConstructBase) /* 71 */
  843. #define Itcl_InvokeMethodIfExists \
  844. (itclIntStubsPtr->itcl_InvokeMethodIfExists) /* 72 */
  845. /* Slot 73 is reserved */
  846. #define Itcl_ReportFuncErrors \
  847. (itclIntStubsPtr->itcl_ReportFuncErrors) /* 74 */
  848. #define Itcl_ParseInit \
  849. (itclIntStubsPtr->itcl_ParseInit) /* 75 */
  850. #define Itcl_ClassCmd \
  851. (itclIntStubsPtr->itcl_ClassCmd) /* 76 */
  852. #define Itcl_ClassInheritCmd \
  853. (itclIntStubsPtr->itcl_ClassInheritCmd) /* 77 */
  854. #define Itcl_ClassProtectionCmd \
  855. (itclIntStubsPtr->itcl_ClassProtectionCmd) /* 78 */
  856. #define Itcl_ClassConstructorCmd \
  857. (itclIntStubsPtr->itcl_ClassConstructorCmd) /* 79 */
  858. #define Itcl_ClassDestructorCmd \
  859. (itclIntStubsPtr->itcl_ClassDestructorCmd) /* 80 */
  860. #define Itcl_ClassMethodCmd \
  861. (itclIntStubsPtr->itcl_ClassMethodCmd) /* 81 */
  862. #define Itcl_ClassProcCmd \
  863. (itclIntStubsPtr->itcl_ClassProcCmd) /* 82 */
  864. #define Itcl_ClassVariableCmd \
  865. (itclIntStubsPtr->itcl_ClassVariableCmd) /* 83 */
  866. #define Itcl_ClassCommonCmd \
  867. (itclIntStubsPtr->itcl_ClassCommonCmd) /* 84 */
  868. #define Itcl_ParseVarResolver \
  869. (itclIntStubsPtr->itcl_ParseVarResolver) /* 85 */
  870. #define Itcl_BiInit \
  871. (itclIntStubsPtr->itcl_BiInit) /* 86 */
  872. #define Itcl_InstallBiMethods \
  873. (itclIntStubsPtr->itcl_InstallBiMethods) /* 87 */
  874. #define Itcl_BiIsaCmd \
  875. (itclIntStubsPtr->itcl_BiIsaCmd) /* 88 */
  876. #define Itcl_BiConfigureCmd \
  877. (itclIntStubsPtr->itcl_BiConfigureCmd) /* 89 */
  878. #define Itcl_BiCgetCmd \
  879. (itclIntStubsPtr->itcl_BiCgetCmd) /* 90 */
  880. #define Itcl_BiChainCmd \
  881. (itclIntStubsPtr->itcl_BiChainCmd) /* 91 */
  882. #define Itcl_BiInfoClassCmd \
  883. (itclIntStubsPtr->itcl_BiInfoClassCmd) /* 92 */
  884. #define Itcl_BiInfoInheritCmd \
  885. (itclIntStubsPtr->itcl_BiInfoInheritCmd) /* 93 */
  886. #define Itcl_BiInfoHeritageCmd \
  887. (itclIntStubsPtr->itcl_BiInfoHeritageCmd) /* 94 */
  888. #define Itcl_BiInfoFunctionCmd \
  889. (itclIntStubsPtr->itcl_BiInfoFunctionCmd) /* 95 */
  890. #define Itcl_BiInfoVariableCmd \
  891. (itclIntStubsPtr->itcl_BiInfoVariableCmd) /* 96 */
  892. #define Itcl_BiInfoBodyCmd \
  893. (itclIntStubsPtr->itcl_BiInfoBodyCmd) /* 97 */
  894. #define Itcl_BiInfoArgsCmd \
  895. (itclIntStubsPtr->itcl_BiInfoArgsCmd) /* 98 */
  896. /* Slot 99 is reserved */
  897. #define Itcl_EnsembleInit \
  898. (itclIntStubsPtr->itcl_EnsembleInit) /* 100 */
  899. #define Itcl_CreateEnsemble \
  900. (itclIntStubsPtr->itcl_CreateEnsemble) /* 101 */
  901. #define Itcl_AddEnsemblePart \
  902. (itclIntStubsPtr->itcl_AddEnsemblePart) /* 102 */
  903. #define Itcl_GetEnsemblePart \
  904. (itclIntStubsPtr->itcl_GetEnsemblePart) /* 103 */
  905. #define Itcl_IsEnsemble \
  906. (itclIntStubsPtr->itcl_IsEnsemble) /* 104 */
  907. #define Itcl_GetEnsembleUsage \
  908. (itclIntStubsPtr->itcl_GetEnsembleUsage) /* 105 */
  909. #define Itcl_GetEnsembleUsageForObj \
  910. (itclIntStubsPtr->itcl_GetEnsembleUsageForObj) /* 106 */
  911. #define Itcl_EnsembleCmd \
  912. (itclIntStubsPtr->itcl_EnsembleCmd) /* 107 */
  913. #define Itcl_EnsPartCmd \
  914. (itclIntStubsPtr->itcl_EnsPartCmd) /* 108 */
  915. #define Itcl_EnsembleErrorCmd \
  916. (itclIntStubsPtr->itcl_EnsembleErrorCmd) /* 109 */
  917. /* Slot 110 is reserved */
  918. /* Slot 111 is reserved */
  919. /* Slot 112 is reserved */
  920. /* Slot 113 is reserved */
  921. /* Slot 114 is reserved */
  922. #define Itcl_Assert \
  923. (itclIntStubsPtr->itcl_Assert) /* 115 */
  924. #define Itcl_IsObjectCmd \
  925. (itclIntStubsPtr->itcl_IsObjectCmd) /* 116 */
  926. #define Itcl_IsClassCmd \
  927. (itclIntStubsPtr->itcl_IsClassCmd) /* 117 */
  928. /* Slot 118 is reserved */
  929. /* Slot 119 is reserved */
  930. /* Slot 120 is reserved */
  931. /* Slot 121 is reserved */
  932. /* Slot 122 is reserved */
  933. /* Slot 123 is reserved */
  934. /* Slot 124 is reserved */
  935. /* Slot 125 is reserved */
  936. /* Slot 126 is reserved */
  937. /* Slot 127 is reserved */
  938. /* Slot 128 is reserved */
  939. /* Slot 129 is reserved */
  940. /* Slot 130 is reserved */
  941. /* Slot 131 is reserved */
  942. /* Slot 132 is reserved */
  943. /* Slot 133 is reserved */
  944. /* Slot 134 is reserved */
  945. /* Slot 135 is reserved */
  946. /* Slot 136 is reserved */
  947. /* Slot 137 is reserved */
  948. /* Slot 138 is reserved */
  949. /* Slot 139 is reserved */
  950. #define Itcl_FilterAddCmd \
  951. (itclIntStubsPtr->itcl_FilterAddCmd) /* 140 */
  952. #define Itcl_FilterDeleteCmd \
  953. (itclIntStubsPtr->itcl_FilterDeleteCmd) /* 141 */
  954. #define Itcl_ForwardAddCmd \
  955. (itclIntStubsPtr->itcl_ForwardAddCmd) /* 142 */
  956. #define Itcl_ForwardDeleteCmd \
  957. (itclIntStubsPtr->itcl_ForwardDeleteCmd) /* 143 */
  958. #define Itcl_MixinAddCmd \
  959. (itclIntStubsPtr->itcl_MixinAddCmd) /* 144 */
  960. #define Itcl_MixinDeleteCmd \
  961. (itclIntStubsPtr->itcl_MixinDeleteCmd) /* 145 */
  962. /* Slot 146 is reserved */
  963. /* Slot 147 is reserved */
  964. /* Slot 148 is reserved */
  965. /* Slot 149 is reserved */
  966. /* Slot 150 is reserved */
  967. #define Itcl_BiInfoUnknownCmd \
  968. (itclIntStubsPtr->itcl_BiInfoUnknownCmd) /* 151 */
  969. #define Itcl_BiInfoVarsCmd \
  970. (itclIntStubsPtr->itcl_BiInfoVarsCmd) /* 152 */
  971. #define Itcl_CanAccess2 \
  972. (itclIntStubsPtr->itcl_CanAccess2) /* 153 */
  973. /* Slot 154 is reserved */
  974. /* Slot 155 is reserved */
  975. /* Slot 156 is reserved */
  976. /* Slot 157 is reserved */
  977. /* Slot 158 is reserved */
  978. /* Slot 159 is reserved */
  979. #define Itcl_SetCallFrameResolver \
  980. (itclIntStubsPtr->itcl_SetCallFrameResolver) /* 160 */
  981. #define ItclEnsembleSubCmd \
  982. (itclIntStubsPtr->itclEnsembleSubCmd) /* 161 */
  983. #define Itcl_GetUplevelNamespace \
  984. (itclIntStubsPtr->itcl_GetUplevelNamespace) /* 162 */
  985. #define Itcl_GetCallFrameClientData \
  986. (itclIntStubsPtr->itcl_GetCallFrameClientData) /* 163 */
  987. /* Slot 164 is reserved */
  988. #define Itcl_SetCallFrameNamespace \
  989. (itclIntStubsPtr->itcl_SetCallFrameNamespace) /* 165 */
  990. #define Itcl_GetCallFrameObjc \
  991. (itclIntStubsPtr->itcl_GetCallFrameObjc) /* 166 */
  992. #define Itcl_GetCallFrameObjv \
  993. (itclIntStubsPtr->itcl_GetCallFrameObjv) /* 167 */
  994. #define Itcl_NWidgetCmd \
  995. (itclIntStubsPtr->itcl_NWidgetCmd) /* 168 */
  996. #define Itcl_AddOptionCmd \
  997. (itclIntStubsPtr->itcl_AddOptionCmd) /* 169 */
  998. #define Itcl_AddComponentCmd \
  999. (itclIntStubsPtr->itcl_AddComponentCmd) /* 170 */
  1000. #define Itcl_BiInfoOptionCmd \
  1001. (itclIntStubsPtr->itcl_BiInfoOptionCmd) /* 171 */
  1002. #define Itcl_BiInfoComponentCmd \
  1003. (itclIntStubsPtr->itcl_BiInfoComponentCmd) /* 172 */
  1004. #define Itcl_RenameCommand \
  1005. (itclIntStubsPtr->itcl_RenameCommand) /* 173 */
  1006. #define Itcl_PushCallFrame \
  1007. (itclIntStubsPtr->itcl_PushCallFrame) /* 174 */
  1008. #define Itcl_PopCallFrame \
  1009. (itclIntStubsPtr->itcl_PopCallFrame) /* 175 */
  1010. #define Itcl_GetUplevelCallFrame \
  1011. (itclIntStubsPtr->itcl_GetUplevelCallFrame) /* 176 */
  1012. #define Itcl_ActivateCallFrame \
  1013. (itclIntStubsPtr->itcl_ActivateCallFrame) /* 177 */
  1014. #define ItclSetInstanceVar \
  1015. (itclIntStubsPtr->itclSetInstanceVar) /* 178 */
  1016. #define ItclCapitalize \
  1017. (itclIntStubsPtr->itclCapitalize) /* 179 */
  1018. #define ItclClassBaseCmd \
  1019. (itclIntStubsPtr->itclClassBaseCmd) /* 180 */
  1020. #define ItclCreateComponent \
  1021. (itclIntStubsPtr->itclCreateComponent) /* 181 */
  1022. #define Itcl_SetContext \
  1023. (itclIntStubsPtr->itcl_SetContext) /* 182 */
  1024. #define Itcl_UnsetContext \
  1025. (itclIntStubsPtr->itcl_UnsetContext) /* 183 */
  1026. #define ItclGetInstanceVar \
  1027. (itclIntStubsPtr->itclGetInstanceVar) /* 184 */
  1028. #endif /* defined(USE_ITCL_STUBS) */
  1029. /* !END!: Do not edit above this line. */
  1030. #endif /* _ITCLINTDECLS */