Index: xvfs-core.c ================================================================== --- xvfs-core.c +++ xvfs-core.c @@ -81,12 +81,15 @@ static Tcl_Channel xvfs_tclfs_openFileChannel(Tcl_Interp *interp, Tcl_Obj *path, int mode, int permissions, struct xvfs_tclfs_instance_info *instanceInfo) { const char *pathStr; pathStr = xvfs_relativePath(path, instanceInfo); -fprintf(stderr, "Called open(%s)!\n", pathStr); - + /* + * XXX:TODO: Do something to create the Tcl_Channel we + * need to return here + */ + return(NULL); } #endif /* XVFS_MODE_SERVER || XVFS_MODE_STANDALONE || XVFS_MODE_FLEIXBLE */ #if defined(XVFS_MODE_STANDALONE) || defined(XVFS_MODE_FLEXIBLE) Index: xvfs.c.rvt ================================================================== --- xvfs.c.rvt +++ xvfs.c.rvt @@ -1,10 +1,10 @@ #include +#include #include #include #include -#include #define XVFS_NAME_LOOKUP_ERROR (-1) #define XVFS_FILE_BLOCKSIZE 1024 #define MIN(a, b) (((a) < (b)) ? (a) : (b))