Parent Directory | Revision Log
|Links to HEAD:||(view) (annotate)|
|Links to mcvs-1-0-5:||(view) (annotate)|
* code/dirwalk.lisp (dirwalk): If the argument is not a directory, the callback must still be invoked. This was done prior to a 2002-05-20 commit. I can't quite remember why it was changed; but I seem to recall thinking about the new dirwalk-skip catch, and how it must be always visible to the callback closure, so that the (skip) mechanism works.
Use getcwd to to implement mcvs-locate. * code/unix-bindings/unix.lisp (getcwd): New call out, invokes impl_getcwd. * code/unix-bindings/impl.c (impl_getcwd): New function, use getcwd() to obtain current working directory, resizing dynamic buffer if necessary to get the entire path. * code/clisp-unix.lisp (getcwd): New wrapper function. * code/dirwalk.lisp (go-up): Function removed. * code/mapping.lisp (mcvs-locate): Rewritten to obtain path using getcwd, then try looking for MCVS directory in successively shorter prefixes of that path.
* dirwalk.lisp (dirwalk-fi): Bugfix: top call was not passing down keyword parameters to recursive call.
Adding mcvs remap command. * dirwalk.lisp (dirwalk-fi, dirwalk, for-each-file-info): Default behavior is now preorder (visit directory before its entries). A keyword is provided to select the old postorder behavior. A catch is provided in dirwalk-fi that allows the caller to skip processing the currently traversed directory. The for-each-* macros provide a local function called (skip) to do this. (delete-recursive): This function depends on postorder behavior in for-each-file-info, so it explicitly selects it now. * mcvs.lisp (*remap-options*): New constant. (*mcvs-command-table*): Add entry for new function. (*usage*): Describes new function. * remap.lisp: New file. (mcvs-remap, mcvs-remap-wrapper): New functions.
Added workaround for operating system argument passing limitations, resembling the Unix xargs utility. Also, trimmed some fat from the basename function. * clisp-linux.lisp: (*argument-limit*): New constant added. (arglist-to-command-string): Function removed. (execute-program): Function removed. (shell-interpreter): New function, wrapper for CLISP's shell function, turns exit status into T (success) or NIL (failure). * diff.lisp (mcvs-diff): Uses execute-program-xargs instead of execute-program. * posix.lisp (basename): Does not canonicalize path name. This turns out to be an unnecessary performance hit in some cases. (arglist-to-command-string): New function. Similar to what was removed from clisp-linux, but this one properly escapes all shell metacharacters. (execute-program): New function, calls shell-interpreter. (execute-program-xargs): New function. Takes two argument lists. Forms one or more command lines by combining the first argument list with one or more pieces of the second argument list, and executes each command. The length of the pieces is determined by the argument passing limit. * dirwalk.lisp (ensure-directories-gone): Add use of canonicalize-path because basename doesn't do it.
MCVS is being renamed to Meta-CVS.
Fix compiler warnings.
mcvs-add: do not allow addition of files that are in MCVS area.
Adding all existing source files.
This form allows you to request diffs between any two revisions of this file. For each of the two "sides" of the diff, select a symbolic revision name using the selection box, or choose 'Use Text Field' and enter a numeric revision.
|Powered by ViewVC 1.1.5|