Mercurial > emacs

view lib-src/leditcfns.c @ 64537:725c23089fbb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(virtual-dired): Declare with `defalias'. (dired-mark-unmarked-files, dired-local-variables-file, dired-omit-here-always): Doc fix. (dired-omit-mode, dired-find-subdir, dired-enable-local-variables, dired-clean-up-buffers-too, dired-extra-startup, dired-mark-extension, dired-jump, dired-jump-other-window, dired-omit-localp, dired-virtual-mode, dired-smart-shell-command, dired-guess-shell-alist-user, dired-man, dired-initial-position, dired-x-hands-off-my-keys, dired-x-bind-find-file, dired-x-submit-report): Fix typos in docstrings. (dired-mark-unmarked-files): "?\ " -> "?\s".
author Juanma Barranquero <lekktu@gmail.com>
date Wed, 20 Jul 2005 14:54:27 +0000
parents 695cf19ef79e
children 375f2633d815
line wrap: on
line source

#include <sgtty.h>
#include <signal.h>
#define STRLEN 100
static char str[STRLEN+1] = "%?emacs"; /* extra char for the null */

switch_to_proc(){
    char *ptr = str;
    while (*ptr) ioctl(0, TIOCSTI, ptr++);
    ioctl(0, TIOCSTI, "\n");
    kill(getpid(), SIGTSTP);
    }

set_proc_str(ptr) char *ptr; {
    if (strlen(ptr) <= STRLEN)
	strcpy(str, ptr);
    else
	printf("string too long for set-proc-str: %s\n", ptr);
    }

/* arch-tag: eb7ae804-0d6e-4077-ab42-7173821410c3
   (do not change this comment) */