Index: generic/nsf.c =================================================================== diff -u -r5f75e1d7749f783de32db2456e015f09e300f8f9 -r8ab7863eb6b0e1a3f5cecad0261cb37ccb8168d5 --- generic/nsf.c (.../nsf.c) (revision 5f75e1d7749f783de32db2456e015f09e300f8f9) +++ generic/nsf.c (.../nsf.c) (revision 8ab7863eb6b0e1a3f5cecad0261cb37ccb8168d5) @@ -726,11 +726,6 @@ NsfGetClass(Tcl_Interp *interp, CONST char *name) { return (Nsf_Class *)GetClassFromString(interp, name); } -extern int -NsfGetClassFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, - Nsf_Class **clPtr, int withUnknown) { - return GetClassFromObj(interp, objPtr, (NsfClass **)clPtr, withUnknown); -} extern Nsf_Class * NsfIsClass(Tcl_Interp *UNUSED(interp), ClientData clientData) { if (clientData && NsfObjectIsClass((NsfObject *)clientData)) { @@ -1272,6 +1267,14 @@ } /* + * Version of GetClassFromObj() with external symbol + */ +extern int +NsfGetClassFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, + NsfClass **clPtr, int withUnknown) { + return GetClassFromObj(interp, objPtr, clPtr, withUnknown); +} +/* *---------------------------------------------------------------------- * IsObjectOfType -- *