ex/ex_mark.c

   1 /*-
   2  * Copyright (c) 1992, 1993
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * %sccs.include.redist.c%
   6  */
   7
   8 #ifndef lint
   9 static char sccsid[] = "$Id: ex_mark.c,v 8.4 1993/12/02 10:47:23 bostic Exp $ (Berkeley) $Date: 1993/12/02 10:47:23 $";
  10 #endif /* not lint */
  11
  12 #include <sys/types.h>
  13
  14 #include "vi.h"
  15 #include "excmd.h"
  16
  17 int
  18 ex_mark(sp, ep, cmdp)
  19         SCR *sp;
  20         EXF *ep;
  21         EXCMDARG *cmdp;
  22 {
  23         if (cmdp->argv[0]->len != 1) {
  24                 msgq(sp, M_ERR, "Mark names must be a single character.");
  25                 return (1);
  26         }
  27         return (mark_set(sp, ep, cmdp->argv[0]->bp[0], &cmdp->addr1, 1));
  28 }