Mercurial > emacs
view src/s/usg5-4.h @ 22293:0544aa57ff27
(cperl-style-alist): New variable, since `c-mode'
is no longer loaded.
- (Somebody who uses the styles should check that they work OK!)
- (a lot of work is needed, especially with new
`cperl-fix-line-spacing').
Old value of style is memorized when choosing a new style, may be
restored from the same menu.
(cperl-perldoc, cperl-pod-to-manpage): New commands; thanks to
Anthony Foiani <afoiani@uswest.com> and Nick Roberts
<Nick.Roberts@src.bae.co.uk>.
(`Perl doc', `Regexp'): New submenus (latter to allow short displays).
(cperl-clobber-lisp-bindings): New cfg variable.
(cperl-find-pods-heres): $a->y() is not y///.
(cperl-after-block-p): Add save-excursion.
(cperl-init-faces): Was failing.
Init faces when loading `ps-print'.
(cperl-toggle-autohelp): New command.
(cperl-electric-paren): `while SPACE LESS' was buggy.
(cperl-init-faces): `-text' in `[-text => 1]' was not highlighted.
(cperl-after-block-p): was FALSE after `sub f {}'.
(cperl-electric-keyword): `foreachmy', `formy' expanded too,
Expands `=pod-directive'.
(cperl-linefeed): behaves reasonable in POD-directive lines.
(cperl-message-electric-keyword): new cfg variable.
(cperl-electric-keyword): print a message, governed by
`cperl-message-electric-keyword'.
(cperl-electric-paren): Typing `}' was not checking for being
block or not.
(cperl-beautify-regexp-piece): Did not know about lookbehind;
finding *which* level to work with was not intuitive.
(cperl-beautify-levels): New command.
(cperl-electric-keyword): Allow here-docs contain `=head1'
and friends for keyword expansion.
Fix for broken `font-lock-unfontify-region-function'. Should
preserve `syntax-table' properties even with `lazy-lock'.
(cperl-indent-region-fix-else): New command.
(cperl-fix-line-spacing): New command.
(cperl-invert-if-unless): New command (C-c C-t and in Menu).
(cperl-hints): mention 20.2's goods/bads.
(cperl-extra-newline-before-brace-multiline): Started to use it.
(cperl-break-one-line-blocks-when-indent): New cfg variable.
(cperl-fix-hanging-brace-when-indent): New cfg variable.
(cperl-merge-trailing-else): New cfg variable.
Workaround for another `font-lock's `syntax-table' text-property bug.
`zerop' could be applied to nil.
At last, may work with `font-lock' without setting `cperl-font-lock'.
(cperl-indent-region-fix-constructs): Renamed from
`cperl-indent-region-fix-constructs'.
(cperl-fix-line-spacing): could be triggered inside strings, would not
know what to do with BLOCKs of map/printf/etc.
(cperl-merge-trailing-else): Handle `continue' too.
(cperl-fix-line-spacing): Likewise.
(cperl-calculate-indent): Knows about map/printf/etc before {BLOCK};
treat after-comma lines as continuation lines.
(cperl-mode): `continue' made electric.
(cperl-electric-keyword): Electric `do' inserts `do/while'.
(cperl-fontify-syntaxically): New function.
(cperl-syntaxify-by-font-lock): New cfg variable.
Make syntaxification to be autoredone via `font-lock',
switched on by `cperl-syntaxify-by-font-lock', off by default so far.
Remove some commented out chunks.
(cperl-set-style-back): Old value of style is memorized when
choosing a new style, may be restored from the same menu.
Mode-documentation added to micro-docs.
(cperl-praise): updated.
(cperl-toggle-construct-fix): New command. Added on C-c C-w and menu.
(auto-fill-mode): added on C-c C-f and menu.
(cperl-style-alist): `PerlStyle' style added.
(cperl-find-pods-heres): Message for termination of scan corrected.
(cperl-speed): New variable with hints.
(cperl-electric-else): Make backspace electric after
expansion of `else/continue' too.
Fixed customization to honor cperl-hairy.
Created customization groups.
All the compile-time warnings fixed.
(cperl-syntaxify-by-font-lock): Interaction with `font-lock-hot-pass'
fixed.
(cperl-after-block-and-statement-beg): It is BLOCK if we reach lim
when backup sexp.
(cperl-after-block-p, cperl-after-expr-p): Likewise.
(cperl-indent-region): Make a marker for END - text added/removed.
(cperl-style-alist): Include `cperl-merge-trailing-else'
where the value is clear.
(cperl-styles-entries): Likewise.
(cperl-tips, cperl-problems): Improvements to docs.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 30 May 1998 15:43:16 +0000 |
parents | 090728aee80a |
children | 17d161505a18 |
line wrap: on
line source
/* Definitions file for GNU Emacs running on AT&T's System V Release 4 Copyright (C) 1987, 1990 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, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /* This file written by James Van Artsdalen of Dell Computer Corporation. * james@bigtex.cactus.org. Subsequently improved for Dell 2.2 by Eric * S. Raymond <esr@snark.thyrsus.com>. */ /* Use the SysVr3 file for at least base configuration. */ #include "usg5-3.h" #define USG5_4 /* We do have multiple jobs. Handle ^Z. */ #undef NOMULTIPLEJOBS #define LIBS_SYSTEM -lsocket -lnsl -lelf #define ORDINARY_LINK #if 0 #ifdef ORDINARY_LINK #define LIB_STANDARD -lc /usr/ucblib/libucb.a #else #define START_FILES pre-crt0.o /usr/ccs/lib/crt1.o /usr/ccs/lib/crti.o /usr/ccs/lib/values-Xt.o #define LIB_STANDARD -lc /usr/ucblib/libucb.a /usr/ccs/lib/crtn.o #endif #else #ifdef ORDINARY_LINK #define LIB_STANDARD #else #define START_FILES pre-crt0.o /usr/ccs/lib/crt1.o /usr/ccs/lib/crti.o /usr/ccs/lib/values-Xt.o #define LIB_STANDARD -lc /usr/ccs/lib/crtn.o #endif #endif /* there are no -lg libraries on this system, and no libPW */ #define LIBS_DEBUG /* This is turned off because nobody actually uses LIBS_STANDARD (Nov 1995). That name is a typo. The next step is to delete this entirely. */ /* #define LIBS_STANDARD -lc */ /* No <sioctl.h> */ #define NO_SIOCTL_H /* Undump with ELF */ #undef COFF #define UNEXEC unexelf.o /* <sys/stat.h> *defines* stat(2) as a static function. If "static" * is blank, then many files will have a public definition for stat(2). */ #undef static /* Get FIONREAD from <sys/filio.h>. Get <sys/ttold.h> to get struct * tchars. But get <termio.h> first to make sure ttold.h doesn't * interfere. And don't try to use SIGIO yet. */ #ifndef NOT_C_CODE #include <sys/wait.h> #endif #ifdef emacs #ifndef NO_FILIO_H #include <sys/filio.h> #endif #include <termio.h> #include <sys/ttold.h> #include <signal.h> #include <sys/stream.h> #include <sys/stropts.h> #include <sys/termios.h> #undef SIGIO #endif /* Some SVr4s don't define NSIG in sys/signal.h for ANSI environments; * instead, there's a system variable _sys_nsig. Unfortunately, we need the * constant to dimension an array. So wire in the appropriate value here. */ #ifndef NSIG #define NSIG 32 #endif /* We need bss_end from emacs.c for undumping */ #ifndef USG_SHARED_LIBRARIES #define USG_SHARED_LIBRARIES #endif /* We can support this */ #define CLASH_DETECTION #define HAVE_PTYS #define HAVE_TERMIOS #undef BROKEN_TIOCGWINSZ #undef BROKEN_TIOCGETC /* It is possible to receive SIGCHLD when there are no children waiting, because a previous waitsys(2) cleaned up the carcass of child without clearing the SIGCHLD pending info. So, use a non-blocking wait3 instead, which maps to waitpid(2) in SysVr4. */ #define HAVE_WAIT_HEADER #define WAITTYPE int #define wait3(status, options, rusage) \ waitpid ((pid_t) -1, (status), (options)) #define WRETCODE(w) (w >> 8) /* TIOCGPGRP is broken in SysVr4, so we can't send signals to PTY subprocesses the usual way. But TIOCSIGNAL does work for PTYs, and this is all we need. */ #define TIOCSIGSEND TIOCSIGNAL /* This change means that we don't loop through allocate_pty too many times in the (rare) event of a failure. */ #undef FIRST_PTY_LETTER #define FIRST_PTY_LETTER 'z' /* This sets the name of the master side of the PTY. */ #define PTY_NAME_SPRINTF strcpy (pty_name, "/dev/ptmx"); /* This sets the name of the slave side of the PTY. On SysVr4, grantpt(3) forks a subprocess, so keep sigchld_handler() from intercepting that death. If any child but grantpt's should die within, it should be caught after sigrelse(2). */ #define PTY_TTY_NAME_SPRINTF \ { \ char *ptsname (), *ptyname; \ \ sighold (SIGCLD); \ if (grantpt (fd) == -1) \ { close (fd); return -1; } \ sigrelse (SIGCLD); \ if (unlockpt (fd) == -1) \ { close (fd); return -1; } \ if (!(ptyname = ptsname (fd))) \ { close (fd); return -1; } \ strncpy (pty_name, ptyname, sizeof (pty_name)); \ pty_name[sizeof (pty_name) - 1] = 0; \ } /* Push various streams modules onto a PTY channel. */ #define SETUP_SLAVE_PTY \ if (ioctl (xforkin, I_PUSH, "ptem") == -1) \ fatal ("ioctl I_PUSH ptem", errno); \ if (ioctl (xforkin, I_PUSH, "ldterm") == -1) \ fatal ("ioctl I_PUSH ldterm", errno); \ if (ioctl (xforkin, I_PUSH, "ttcompat") == -1) \ fatal ("ioctl I_PUSH ttcompat", errno); /* Undo the SVr3 X11 library definition */ #undef LIB_X11_LIB /* The definition of this in s-usg5-3.h is not needed in 5.4. */ /* liblnsl_s should never be used. The _s suffix implies a shared library, as opposed to a DLL. Share libraries were used in SVR3, and are available only in order to allow SVR3 binaries to run. They should not be linked in to new binaries. -- caraway!pinkas@caraway.intel.com. */ #undef LIBX10_SYSTEM #undef LIBX11_SYSTEM /* Tell x11term.c and keyboard.c we have the system V streams feature. */ #define SYSV_STREAMS /* This definition was suggested for next release. So give it a try. */ #define HAVE_SOCKETS #define bcopy(src,dst,n) memmove (dst,src,n) #define bcmp(src,dst,n) memcmp (src,dst,n) #define bzero(s,n) memset (s,0,n)