Index: kitdll/buildsrc/kitdll-0.0/vfs_kitdll_data.c ================================================================== --- kitdll/buildsrc/kitdll-0.0/vfs_kitdll_data.c +++ kitdll/buildsrc/kitdll-0.0/vfs_kitdll_data.c @@ -176,11 +176,11 @@ Tcl_SetResult(interp, "Invalid arguments, start must be less than end", TCL_STATIC); return(TCL_ERROR); } - ret_str = Tcl_NewStringObj((const char *) finfo->data + start, (end - start)); + ret_str = Tcl_NewByteArrayObj(finfo->data + start, (end - start)); Tcl_SetObjResult(interp, ret_str); return(TCL_OK); }