summaryrefslogtreecommitdiffstats
path: root/generic/tclOO.decls
diff options
context:
space:
mode:
authornijtmans <nijtmans>2010-09-15 07:33:54 (GMT)
committernijtmans <nijtmans>2010-09-15 07:33:54 (GMT)
commit40bb3c1c5474de09c765ddb9a90c5126d08e38f5 (patch)
tree6b80a82463c8641f8327c736faff1acc75f9889b /generic/tclOO.decls
parent63c9caabab37581d13e0ccacca5e07416efbdf6a (diff)
downloadtcl-40bb3c1c5474de09c765ddb9a90c5126d08e38f5.zip
tcl-40bb3c1c5474de09c765ddb9a90c5126d08e38f5.tar.gz
tcl-40bb3c1c5474de09c765ddb9a90c5126d08e38f5.tar.bz2
[Patch 3034251] backport ttkGenStubs.tcl
features to genStubs.tcl. Make the "generic" argument in the *.decls files optional (no change to any tcl*Decls.h files) This allows genStubs.tcl to generate the ttk stub files as well, while keeping full compatibility with existing *.decls files.
Diffstat (limited to 'generic/tclOO.decls')
-rw-r--r--generic/tclOO.decls93
1 files changed, 47 insertions, 46 deletions
diff --git a/generic/tclOO.decls b/generic/tclOO.decls
index f334103..80b4eff 100644
--- a/generic/tclOO.decls
+++ b/generic/tclOO.decls
@@ -1,4 +1,4 @@
-# $Id: tclOO.decls,v 1.7 2010/03/05 15:32:16 dkf Exp $
+# $Id: tclOO.decls,v 1.8 2010/09/15 07:33:54 nijtmans Exp $
library tclOO
@@ -8,111 +8,112 @@ library tclOO
interface tclOO
hooks tclOOInt
+scspec EXTERN
-declare 0 generic {
+declare 0 {
Tcl_Object Tcl_CopyObjectInstance(Tcl_Interp *interp,
Tcl_Object sourceObject, const char *targetName,
const char *targetNamespaceName)
}
-declare 1 generic {
+declare 1 {
Tcl_Object Tcl_GetClassAsObject(Tcl_Class clazz)
}
-declare 2 generic {
+declare 2 {
Tcl_Class Tcl_GetObjectAsClass(Tcl_Object object)
}
-declare 3 generic {
+declare 3 {
Tcl_Command Tcl_GetObjectCommand(Tcl_Object object)
}
-declare 4 generic {
+declare 4 {
Tcl_Object Tcl_GetObjectFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr)
}
-declare 5 generic {
+declare 5 {
Tcl_Namespace *Tcl_GetObjectNamespace(Tcl_Object object)
}
-declare 6 generic {
+declare 6 {
Tcl_Class Tcl_MethodDeclarerClass(Tcl_Method method)
}
-declare 7 generic {
+declare 7 {
Tcl_Object Tcl_MethodDeclarerObject(Tcl_Method method)
}
-declare 8 generic {
+declare 8 {
int Tcl_MethodIsPublic(Tcl_Method method)
}
-declare 9 generic {
+declare 9 {
int Tcl_MethodIsType(Tcl_Method method, const Tcl_MethodType *typePtr,
ClientData *clientDataPtr)
}
-declare 10 generic {
+declare 10 {
Tcl_Obj *Tcl_MethodName(Tcl_Method method)
}
-declare 11 generic {
+declare 11 {
Tcl_Method Tcl_NewInstanceMethod(Tcl_Interp *interp, Tcl_Object object,
Tcl_Obj *nameObj, int isPublic, const Tcl_MethodType *typePtr,
ClientData clientData)
}
-declare 12 generic {
+declare 12 {
Tcl_Method Tcl_NewMethod(Tcl_Interp *interp, Tcl_Class cls,
Tcl_Obj *nameObj, int isPublic, const Tcl_MethodType *typePtr,
ClientData clientData)
}
-declare 13 generic {
+declare 13 {
Tcl_Object Tcl_NewObjectInstance(Tcl_Interp *interp, Tcl_Class cls,
const char *nameStr, const char *nsNameStr, int objc,
Tcl_Obj *const *objv, int skip)
}
-declare 14 generic {
+declare 14 {
int Tcl_ObjectDeleted(Tcl_Object object)
}
-declare 15 generic {
+declare 15 {
int Tcl_ObjectContextIsFiltering(Tcl_ObjectContext context)
}
-declare 16 generic {
+declare 16 {
Tcl_Method Tcl_ObjectContextMethod(Tcl_ObjectContext context)
}
-declare 17 generic {
+declare 17 {
Tcl_Object Tcl_ObjectContextObject(Tcl_ObjectContext context)
}
-declare 18 generic {
+declare 18 {
int Tcl_ObjectContextSkippedArgs(Tcl_ObjectContext context)
}
-declare 19 generic {
+declare 19 {
ClientData Tcl_ClassGetMetadata(Tcl_Class clazz,
const Tcl_ObjectMetadataType *typePtr)
}
-declare 20 generic {
+declare 20 {
void Tcl_ClassSetMetadata(Tcl_Class clazz,
const Tcl_ObjectMetadataType *typePtr, ClientData metadata)
}
-declare 21 generic {
+declare 21 {
ClientData Tcl_ObjectGetMetadata(Tcl_Object object,
const Tcl_ObjectMetadataType *typePtr)
}
-declare 22 generic {
+declare 22 {
void Tcl_ObjectSetMetadata(Tcl_Object object,
const Tcl_ObjectMetadataType *typePtr, ClientData metadata)
}
-declare 23 generic {
+declare 23 {
int Tcl_ObjectContextInvokeNext(Tcl_Interp *interp,
Tcl_ObjectContext context, int objc, Tcl_Obj *const *objv,
int skip)
}
-declare 24 generic {
+declare 24 {
Tcl_ObjectMapMethodNameProc *Tcl_ObjectGetMethodNameMapper(
Tcl_Object object)
}
-declare 25 generic {
+declare 25 {
void Tcl_ObjectSetMethodNameMapper(Tcl_Object object,
Tcl_ObjectMapMethodNameProc *mapMethodNameProc)
}
-declare 26 generic {
+declare 26 {
void Tcl_ClassSetConstructor(Tcl_Interp *interp, Tcl_Class clazz,
Tcl_Method method)
}
-declare 27 generic {
+declare 27 {
void Tcl_ClassSetDestructor(Tcl_Interp *interp, Tcl_Class clazz,
Tcl_Method method)
}
-declare 28 generic {
+declare 28 {
Tcl_Obj *Tcl_GetObjectName(Tcl_Interp *interp, Tcl_Object object)
}
@@ -122,78 +123,78 @@ declare 28 generic {
interface tclOOInt
-declare 0 generic {
+declare 0 {
Tcl_Object TclOOGetDefineCmdContext(Tcl_Interp *interp)
}
-declare 1 generic {
+declare 1 {
Tcl_Method TclOOMakeProcInstanceMethod(Tcl_Interp *interp, Object *oPtr,
int flags, Tcl_Obj *nameObj, Tcl_Obj *argsObj, Tcl_Obj *bodyObj,
const Tcl_MethodType *typePtr, ClientData clientData,
Proc **procPtrPtr)
}
-declare 2 generic {
+declare 2 {
Tcl_Method TclOOMakeProcMethod(Tcl_Interp *interp, Class *clsPtr,
int flags, Tcl_Obj *nameObj, const char *namePtr,
Tcl_Obj *argsObj, Tcl_Obj *bodyObj, const Tcl_MethodType *typePtr,
ClientData clientData, Proc **procPtrPtr)
}
-declare 3 generic {
+declare 3 {
Method *TclOONewProcInstanceMethod(Tcl_Interp *interp, Object *oPtr,
int flags, Tcl_Obj *nameObj, Tcl_Obj *argsObj, Tcl_Obj *bodyObj,
ProcedureMethod **pmPtrPtr)
}
-declare 4 generic {
+declare 4 {
Method *TclOONewProcMethod(Tcl_Interp *interp, Class *clsPtr,
int flags, Tcl_Obj *nameObj, Tcl_Obj *argsObj, Tcl_Obj *bodyObj,
ProcedureMethod **pmPtrPtr)
}
-declare 5 generic {
+declare 5 {
int TclOOObjectCmdCore(Object *oPtr, Tcl_Interp *interp, int objc,
Tcl_Obj *const *objv, int publicOnly, Class *startCls)
}
-declare 6 generic {
+declare 6 {
int TclOOIsReachable(Class *targetPtr, Class *startPtr)
}
-declare 7 generic {
+declare 7 {
Method *TclOONewForwardMethod(Tcl_Interp *interp, Class *clsPtr,
int isPublic, Tcl_Obj *nameObj, Tcl_Obj *prefixObj)
}
-declare 8 generic {
+declare 8 {
Method *TclOONewForwardInstanceMethod(Tcl_Interp *interp, Object *oPtr,
int isPublic, Tcl_Obj *nameObj, Tcl_Obj *prefixObj)
}
-declare 9 generic {
+declare 9 {
Tcl_Method TclOONewProcInstanceMethodEx(Tcl_Interp *interp,
Tcl_Object oPtr, TclOO_PreCallProc *preCallPtr,
TclOO_PostCallProc *postCallPtr, ProcErrorProc *errProc,
ClientData clientData, Tcl_Obj *nameObj, Tcl_Obj *argsObj,
Tcl_Obj *bodyObj, int flags, void **internalTokenPtr)
}
-declare 10 generic {
+declare 10 {
Tcl_Method TclOONewProcMethodEx(Tcl_Interp *interp, Tcl_Class clsPtr,
TclOO_PreCallProc *preCallPtr, TclOO_PostCallProc *postCallPtr,
ProcErrorProc *errProc, ClientData clientData, Tcl_Obj *nameObj,
Tcl_Obj *argsObj, Tcl_Obj *bodyObj, int flags,
void **internalTokenPtr)
}
-declare 11 generic {
+declare 11 {
int TclOOInvokeObject(Tcl_Interp *interp, Tcl_Object object,
Tcl_Class startCls, int publicPrivate, int objc,
Tcl_Obj *const *objv)
}
-declare 12 generic {
+declare 12 {
void TclOOObjectSetFilters(Object *oPtr, int numFilters,
Tcl_Obj *const *filters)
}
-declare 13 generic {
+declare 13 {
void TclOOClassSetFilters(Tcl_Interp *interp, Class *classPtr,
int numFilters, Tcl_Obj *const *filters)
}
-declare 14 generic {
+declare 14 {
void TclOOObjectSetMixins(Object *oPtr, int numMixins,
Class *const *mixins)
}
-declare 15 generic {
+declare 15 {
void TclOOClassSetMixins(Tcl_Interp *interp, Class *classPtr,
int numMixins, Class *const *mixins)
}