Diff

Differences From Artifact [2f0d8b57ce]:

To Artifact [c7558f05e3]:


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