90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
for (idx = 0; idx < (sizeof(ret_list_items) / sizeof(ret_list_items[0])); idx++) {
Tcl_IncrRefCount(ret_list_items[idx]);
}
ret_list = Tcl_NewListObj(sizeof(ret_list_items) / sizeof(ret_list_items[0]), ret_list_items);
Tcl_IncrRefCount(ret_list);
for (idx = 0; idx < (sizeof(ret_list_items) / sizeof(ret_list_items[0])); idx++) {
Tcl_DecrRefCount(ret_list_items[idx]);
}
Tcl_SetObjResult(interp, ret_list);
Tcl_DecrRefCount(ret_list);
return(TCL_OK);
}
static int getData(ClientData cd, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[]) {
struct cvfs_data *finfo = NULL;
cmd_getData_t *cmd_getData;
const char *hashkey;
|
>
>
>
>
<
<
<
<
|
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
for (idx = 0; idx < (sizeof(ret_list_items) / sizeof(ret_list_items[0])); idx++) {
Tcl_IncrRefCount(ret_list_items[idx]);
}
ret_list = Tcl_NewListObj(sizeof(ret_list_items) / sizeof(ret_list_items[0]), ret_list_items);
Tcl_IncrRefCount(ret_list);
Tcl_SetObjResult(interp, ret_list);
Tcl_DecrRefCount(ret_list);
for (idx = 0; idx < (sizeof(ret_list_items) / sizeof(ret_list_items[0])); idx++) {
Tcl_DecrRefCount(ret_list_items[idx]);
}
return(TCL_OK);
}
static int getData(ClientData cd, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[]) {
struct cvfs_data *finfo = NULL;
cmd_getData_t *cmd_getData;
const char *hashkey;
|