Mercurial > hg > xemacs-beta
diff src/process-unix.c @ 867:804517e16990
[xemacs-hg @ 2002-06-05 09:54:39 by ben]
Textual renaming: text/char names
abbrev.c, alloc.c, buffer.c, buffer.h, bytecode.c, callint.c, casefiddle.c, casetab.c, charset.h, chartab.c, chartab.h, cmds.c, console-gtk.h, console-msw.c, console-msw.h, console-stream.c, console-tty.c, console-x.c, console-x.h, console.h, data.c, device-msw.c, device-x.c, dialog-msw.c, dired-msw.c, dired.c, doc.c, doprnt.c, editfns.c, eldap.c, emodules.c, eval.c, event-Xt.c, event-gtk.c, event-msw.c, event-stream.c, event-unixoid.c, events.c, events.h, file-coding.c, file-coding.h, fileio.c, filelock.c, fns.c, font-lock.c, frame-gtk.c, frame-msw.c, frame-x.c, frame.c, glyphs-eimage.c, glyphs-msw.c, glyphs-x.c, glyphs.c, glyphs.h, gpmevent.c, gui-x.c, gui-x.h, gui.c, gui.h, hpplay.c, indent.c, insdel.c, insdel.h, intl-win32.c, keymap.c, line-number.c, line-number.h, lisp-disunion.h, lisp-union.h, lisp.h, lread.c, lrecord.h, lstream.c, lstream.h, md5.c, menubar-msw.c, menubar-x.c, menubar.c, minibuf.c, mule-ccl.c, mule-charset.c, mule-coding.c, mule-wnnfns.c, ndir.h, nt.c, objects-gtk.c, objects-gtk.h, objects-msw.c, objects-tty.c, objects-x.c, objects.c, objects.h, postgresql.c, print.c, process-nt.c, process-unix.c, process.c, procimpl.h, realpath.c, redisplay-gtk.c, redisplay-msw.c, redisplay-output.c, redisplay-tty.c, redisplay-x.c, redisplay.c, redisplay.h, regex.c, search.c, select-common.h, select-gtk.c, select-x.c, sound.h, symbols.c, syntax.c, syntax.h, sysdep.c, sysdep.h, sysdir.h, sysfile.h, sysproc.h, syspwd.h, systime.h, syswindows.h, termcap.c, tests.c, text.c, text.h, toolbar-common.c, tooltalk.c, ui-gtk.c, unexnt.c, unicode.c, win32.c: Text/char naming rationalization.
[a] distinguish between "charptr" when it refers to operations on
the pointer itself and when it refers to operations on text; and
[b] use consistent naming for everything referring to internal
format, i.e.
Itext == text in internal format
Ibyte == a byte in such text
Ichar == a char as represented in internal character format
thus e.g.
set_charptr_emchar -> set_itext_ichar
The pre and post tags on either side of this change are:
pre-internal-format-textual-renaming
post-internal-format-textual-renaming
See the Internals Manual for details of exactly how this was done,
how to handle the change in your workspace, etc.
author | ben |
---|---|
date | Wed, 05 Jun 2002 09:58:45 +0000 |
parents | 84762348c6f9 |
children | b0c24ea6a2a8 |
line wrap: on
line diff
--- a/src/process-unix.c Tue Jun 04 17:40:00 2002 +0000 +++ b/src/process-unix.c Wed Jun 05 09:58:45 2002 +0000 @@ -206,7 +206,7 @@ #ifndef MAX_PTYNAME_LEN #define MAX_PTYNAME_LEN 64 #endif -static Intbyte pty_name[MAX_PTYNAME_LEN]; +static Ibyte pty_name[MAX_PTYNAME_LEN]; /* Open an available pty, returning a file descriptor. Return -1 on failure. @@ -228,8 +228,8 @@ grovelling code in allocate_pty_the_old_fashioned_way(). */ int master_fd = -1; const Extbyte *slave_name = NULL; - const CIntbyte *clone = NULL; - static const CIntbyte * const clones[] = + const CIbyte *clone = NULL; + static const CIbyte * const clones[] = /* Different pty master clone devices */ { "/dev/ptmx", /* Various systems */ @@ -283,7 +283,7 @@ for (i = 0; i < countof (clones); i++) { clone = clones[i]; - master_fd = qxe_open ((Intbyte *) clone, + master_fd = qxe_open ((Ibyte *) clone, O_RDWR | O_NONBLOCK | OPEN_BINARY, 0); if (master_fd >= 0) goto have_master; @@ -311,7 +311,7 @@ have_slave_name: { - Intbyte *slaveint; + Ibyte *slaveint; EXTERNAL_TO_C_STRING (slave_name, slaveint, Qfile_name); qxestrncpy (pty_name, slaveint, sizeof (pty_name)); @@ -869,7 +869,7 @@ int newfd = dup (fd); if (newfd == -1) { - Intbyte *errmess; + Ibyte *errmess; GET_STRERROR (errmess, errno); stderr_out ("Error while setting up child: %s\n", errmess); _exit (1); @@ -894,11 +894,11 @@ parent. */ static void -child_setup (int in, int out, int err, Intbyte **new_argv, +child_setup (int in, int out, int err, Ibyte **new_argv, Lisp_Object current_dir) { - Intbyte **env; - Intbyte *pwd; + Ibyte **env; + Ibyte *pwd; #ifdef SET_EMACS_PRIORITY if (emacs_priority != 0) @@ -921,7 +921,7 @@ REGISTER Bytecount i; i = XSTRING_LENGTH (current_dir); - pwd = alloca_array (Intbyte, i + 6); + pwd = alloca_array (Ibyte, i + 6); memcpy (pwd, "PWD=", 4); memcpy (pwd + 4, XSTRING_DATA (current_dir), i); i += 4; @@ -951,10 +951,10 @@ /* Set `env' to a vector of the strings in Vprocess_environment. */ /* + 2 to include PWD and terminating 0. */ - env = alloca_array (Intbyte *, XINT (Flength (Vprocess_environment)) + 2); + env = alloca_array (Ibyte *, XINT (Flength (Vprocess_environment)) + 2); { REGISTER Lisp_Object tail; - Intbyte **new_env = env; + Ibyte **new_env = env; /* If we have a PWD envvar and we know the real current directory, pass one down, but with corrected value. */ @@ -966,8 +966,8 @@ CONSP (tail) && STRINGP (XCAR (tail)); tail = XCDR (tail)) { - Intbyte **ep = env; - Intbyte *envvar = XSTRING_DATA (XCAR (tail)); + Ibyte **ep = env; + Ibyte *envvar = XSTRING_DATA (XCAR (tail)); /* See if envvar duplicates any string already in the env. If so, don't put it in. @@ -975,7 +975,7 @@ we keep the definition that comes first in process-environment. */ for (; ep != new_env; ep++) { - Intbyte *p = *ep, *q = envvar; + Ibyte *p = *ep, *q = envvar; while (1) { if (*q == 0) @@ -988,7 +988,7 @@ p++, q++; } } - if (pwd && !qxestrncmp ((Intbyte *) "PWD=", envvar, 4)) + if (pwd && !qxestrncmp ((Ibyte *) "PWD=", envvar, 4)) { *new_env++ = pwd; pwd = 0; @@ -1272,7 +1272,7 @@ EMACS_SIGNAL (SIGQUIT, SIG_DFL); { - Intbyte **new_argv = alloca_array (Intbyte *, nargv + 2); + Ibyte **new_argv = alloca_array (Ibyte *, nargv + 2); int i; /* Nothing below here GCs so our string pointers shouldn't move. */ @@ -1509,7 +1509,7 @@ /* use a reasonable-sized buffer (somewhere around the size of the stream buffer) so as to avoid inundating the stream with blocked data. */ - Intbyte chunkbuf[512]; + Ibyte chunkbuf[512]; Bytecount chunklen; while (1) @@ -1591,10 +1591,10 @@ character in init_process_io_handles but here it simply screws things up. */ #if 0 - Intbyte eof_char = get_eof_char (XPROCESS (proc)); + Ibyte eof_char = get_eof_char (XPROCESS (proc)); send_process (proc, Qnil, &eof_char, 0, 1); #else - send_process (proc, Qnil, (const Intbyte *) "\004", 0, 1); + send_process (proc, Qnil, (const Ibyte *) "\004", 0, 1); #endif return 1; } @@ -1732,7 +1732,7 @@ /* If possible, send signals to the entire pgrp by sending an input character to it. */ { - Intbyte sigchar = process_signal_char (d->subtty, signo); + Ibyte sigchar = process_signal_char (d->subtty, signo); if (sigchar) { send_process (proc, Qnil, &sigchar, 0, 1); @@ -1833,7 +1833,7 @@ retval = getaddrinfo (ext_host, NULL, &hints, &res); if (retval != 0) { - CIntbyte *gai_err; + CIbyte *gai_err; EXTERNAL_TO_C_STRING (gai_strerror (retval), gai_err, Qstrerror_encoding); @@ -1929,7 +1929,7 @@ retval = getaddrinfo (ext_host, portstring, &hints, &res); if (retval != 0) { - CIntbyte *gai_err; + CIbyte *gai_err; EXTERNAL_TO_C_STRING (gai_strerror (retval), gai_err, Qstrerror_encoding);