165   char *zProfile;            /* The profile callback routine */  member
555   if( pDb->zProfile ){  in DbDeleteCmd()
556     Tcl_Free(pDb->zProfile);  in DbDeleteCmd()
727   Tcl_DStringAppend(&str, pDb->zProfile, -1);  in DbProfileHandler()
3067       if( pDb->zProfile ){  in DbObjCmd()
3068         Tcl_AppendResult(interp, pDb->zProfile, (char*)0);  in DbObjCmd()
3071       char *zProfile;  in DbObjCmd()  local
3073       if( pDb->zProfile ){  in DbObjCmd()
3074         Tcl_Free(pDb->zProfile);  in DbObjCmd()
3076       zProfile = Tcl_GetStringFromObj(objv[2], &len);  in DbObjCmd()
3077       if( zProfile && len>0 ){  in DbObjCmd()
3078         pDb->zProfile = Tcl_Alloc( len + 1 );  in DbObjCmd()
3079         memcpy(pDb->zProfile, zProfile, len+1);  in DbObjCmd()
3081         pDb->zProfile = 0;  in DbObjCmd()
3085       if( pDb->zProfile ){  in DbObjCmd()