34
34
Tcl_Obj *pRet = Tcl_NewObj();
35
35
for(pBt=GLOBAL(BtShared*,sqlite3SharedCacheList); pBt; pBt=pBt->pNext){
37
37
Tcl_ListObjAppendElement(interp, pRet, Tcl_NewStringObj(zFile, -1));
38
38
Tcl_ListObjAppendElement(interp, pRet, Tcl_NewIntObj(pBt->nRef));