view src/mocklisp.h @ 12943:10d0f42db2da

(vc-directory): Kill existing vc-dired buffers for this directory. Provide a better header. Corrected the check whether any files were found at all (don't display a listing in this case). Under CVS, display cvs-status rather than vc-locking-user. (vc-next-action-on-file): When doing a check-in in vc-dired-mode, find the file in another window. (vc-next-action-dired): Update dired listing while processing the files. (vc-next-action): Check whether a check-in comment is really needed for this mass operation. (vc-checkout): Resynch the buffer, even if it's not current. (vc-dired-state-info, vc-dired-update-line): New functions. (vc-dired-prefix-map): Added local definition for `g' and `='. (vc-dired-reformat-line): Simplified. Erase the hardlink count from the listing, because it doesn't relate to version control. (vc-rcs-release, vc-cvs-release, vc-sccs-release): New variables, may be set by the user. (vc-backend-release, vc-release-greater-or-equal, vc-backend-release-p): New Functions. (vc-do-command): Allow FILE to be nil. (vc-backend-checkin): When creating a branch, don't bother to unlock the old version if this is RCS 5.6.2 or higher. (vc-next-action-on-file): Allow lock-stealing only if RCS 5.6.2 or higher. (vc-backend-admin, vc-backend-checkin): If available, use ci -i and -j. Updated Developer's Notes.

/* Fundamental definitions for emulating mocklisp.
   Copyright (C) 1985, 1986, 1987 Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.

GNU Emacs is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with GNU Emacs; see the file COPYING.  If not, write to
the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */

/* This is the main entry point to mocklisp execution.
 When eval sees a mocklisp function being called, it calls here
 with the unevaluated argument list */

extern Lisp_Object ml_apply ();
extern Lisp_Object Fml_if ();
extern Lisp_Object Fml_nargs ();
extern Lisp_Object Fml_arg ();
extern Lisp_Object Fml_interactive ();
extern Lisp_Object Fml_provide_prefix_argument ();
extern Lisp_Object Fml_prefix_argument_loop ();
extern Lisp_Object Finsert_string ();