Index: generic/gentclAPI.decls
===================================================================
diff -u -ra81ec09e32b0737b60692c06bd4c76b30e35d76a -r663cbc3775577791f4974963c6c44221a82c49ea
--- generic/gentclAPI.decls	(.../gentclAPI.decls)	(revision a81ec09e32b0737b60692c06bd4c76b30e35d76a)
+++ generic/gentclAPI.decls	(.../gentclAPI.decls)	(revision 663cbc3775577791f4974963c6c44221a82c49ea)
@@ -17,10 +17,12 @@
 #
 # Next Scripting commands
 #
-nsfCmd __db_show_stack NsfShowStackCmd {
-}
-nsfCmd __db_run_assertions NsfDebugRunAssertionsCmd {
-}
+nsfCmd __db_show_stack NsfShowStackCmd {}
+nsfCmd __db_run_assertions NsfDebugRunAssertionsCmd {}
+nsfCmd __profile_clear NsfProfileClearDataStub {}
+nsfCmd __profile_print NsfProfilePrintDataStub {}
+nsfCmd __profile_get NsfProfileGetDataStub {}
+
 nsfCmd alias NsfAliasCmd {
   {-argName "object" -required 1 -type object}
   {-argName "-per-object" -required 0}
Index: generic/nsf.c
===================================================================
diff -u -rbb0d12c63024e25ca81a370eb934dbbe2b7a10fd -r663cbc3775577791f4974963c6c44221a82c49ea
--- generic/nsf.c	(.../nsf.c)	(revision bb0d12c63024e25ca81a370eb934dbbe2b7a10fd)
+++ generic/nsf.c	(.../nsf.c)	(revision 663cbc3775577791f4974963c6c44221a82c49ea)
@@ -14313,8 +14313,7 @@
  * Begin generated Next Scripting commands
  *******************************************/
 /*
-nsfCmd __db_show_stack NsfShowStackCmd {
-}
+nsfCmd __db_show_stack NsfShowStackCmd {}
 */
 static int
 NsfShowStackCmd(Tcl_Interp *interp) {
@@ -14323,8 +14322,7 @@
 }
 
 /*
-nsfCmd __db_run_assertions NsfDebugRunAssertionsCmd {
-}
+nsfCmd __db_run_assertions NsfDebugRunAssertionsCmd {}
 */
 static int
 NsfDebugRunAssertionsCmd(Tcl_Interp *interp) {
@@ -14397,6 +14395,33 @@
 }
 
 /*
+nsfCmd __profile_clear_data NsfProfileClearDataStub {}
+*/
+static int
+NsfProfileClearDataStub(Tcl_Interp *interp) {
+  NsfProfileClearData(interp);
+  return TCL_OK;
+}
+
+/*
+nsfCmd __profile_print_data NsfProfilePrintDataStub {}
+*/
+static int
+NsfProfilePrintDataStub(Tcl_Interp *interp) {
+  NsfProfilePrintData(interp);
+  return TCL_OK;
+}
+
+/*
+nsfCmd __profile_get_data NsfProfileGetDataStub {}
+*/
+static int
+NsfProfileGetDataStub(Tcl_Interp *interp) {
+  NsfProfileGetData(interp);
+  return TCL_OK;
+}
+
+/*
 nsfCmd alias NsfAliasCmd {
   {-argName "object" -type object}
   {-argName "-per-object"}
@@ -14988,7 +15013,8 @@
   /*fprintf(stderr, "+++ call tcl-defined exit handler\n");  */
 
 #if defined(NSF_PROFILE)
-  NsfProfilePrintData(interp);
+  //NsfProfilePrintData(interp);
+  NsfProfileClearData(interp);
 #endif
   /*
    * evaluate user-defined exit handler
@@ -16723,7 +16749,7 @@
 
       Tcl_Interp_varFramePtr(interp) = varFramePtr->callerPtr;
       cscPtr->flags = 0;
-      CscInit(cscPtr, object, NULL /*cl*/, NULL /*cmd*/, NSF_CSC_TYPE_PLAIN, 0, "configure");
+      CscInit(cscPtr, object, object->cl /*cl*/, NULL /*cmd*/, NSF_CSC_TYPE_PLAIN, 0, NsfGlobalStrings[NSF_CONFIGURE]);
       Nsf_PushFrameCsc(interp, cscPtr, framePtr2);
 
       if (paramPtr->flags & NSF_ARG_INITCMD) {