Check-in [71bdb44ec6]
Overview
Comment:Added missing Tcl_Preserve() call
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:71bdb44ec69027067e4f0f0864859a95f40da378
User & Date: rkeene on 2014-11-15 19:17:48
Other Links: manifest | tags
Context
2014-11-15
19:34
Updated inode generation to be FNV-1a check-in: fac74d236f user: rkeene tags: trunk
19:17
Added missing Tcl_Preserve() call check-in: 71bdb44ec6 user: rkeene tags: trunk
17:33
Added symlink creation support check-in: f6af28366e user: rkeene tags: trunk
Changes

Modified appfsd.c from [ce9351a270] to [430dbcdf6b].

  1544   1544   
  1545   1545   	appfs_get_path_info_cache_flush(appfs_get_fsuid(), -1);
  1546   1546   
  1547   1547   	interp = appfs_TclInterp();
  1548   1548   	if (interp == NULL) {
  1549   1549   		return(-EIO);
  1550   1550   	}
         1551  +
         1552  +	appfs_call_libtcl(Tcl_Preserve(interp);)
  1551   1553   
  1552   1554   	tcl_ret = appfs_Tcl_Eval(interp, 2, "::appfs::unlinkpath", path);
  1553   1555   	if (tcl_ret != TCL_OK) {
  1554   1556   		APPFS_DEBUG("::appfs::unlinkpath(%s) failed.", path);
  1555   1557   		appfs_call_libtcl(
  1556   1558   			APPFS_DEBUG("Tcl Error is: %s", Tcl_GetStringResult(interp));
  1557   1559   		)