165   char *zProfile;            /* The profile callback routine */  member
566     if( pDb->zProfile ){  in delDatabaseRef()
567       Tcl_Free(pDb->zProfile);  in delDatabaseRef()
748   Tcl_DStringAppend(&str, pDb->zProfile, -1);  in DbProfileHandler()
3093       if( pDb->zProfile ){  in DbObjCmd()
3094         Tcl_AppendResult(interp, pDb->zProfile, (char*)0);  in DbObjCmd()
3097       char *zProfile;  in DbObjCmd()  local
3099       if( pDb->zProfile ){  in DbObjCmd()
3100         Tcl_Free(pDb->zProfile);  in DbObjCmd()
3102       zProfile = Tcl_GetStringFromObj(objv[2], &len);  in DbObjCmd()
3103       if( zProfile && len>0 ){  in DbObjCmd()
3104         pDb->zProfile = Tcl_Alloc( len + 1 );  in DbObjCmd()
3105         memcpy(pDb->zProfile, zProfile, len+1);  in DbObjCmd()
3107         pDb->zProfile = 0;  in DbObjCmd()
3111       if( pDb->zProfile ){  in DbObjCmd()