Mercurial > hg > xemacs-beta
view netinstall/reginfo.h @ 4719:bd51ab22afa8
Make it possible to silence warnings issued when #'mapcar's result is discarded.
lisp/ChangeLog addition:
2009-10-19 Aidan Kehoe <kehoea@parhasard.net>
* bytecomp.el (byte-compile-default-warnings):
Add two new warning types, discarded-consing (basically use of
mapcar instead of mapc where its result is discarded) and
quoted-lambda (use of a lambda expression quoted as data in a
function context).
(byte-compile-warnings): Document the new warnings.
(byte-compile-fset, byte-compile-funarg): Implement the
quoted-lambda warning option.
(byte-compile-mapcar): Renamed to byte-compile-maybe-mapc.
(byte-compile-maybe-mapc, byte-compile-maplist):
Implement the discarded-consing warning option.
Add more functions that should be compiled using
byte-compile-funarg, notably mapvector, mapc-internal,
map-char-table.
* cl-macs.el (mapcar*):
If we know at compile time that there are no CL options being
used, use the mapcar subr, not the byte-coded function.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Mon, 19 Oct 2009 12:47:21 +0100 |
parents | 15139dbf89f4 |
children |
line wrap: on
line source
/* reginfo.h -- XEmacs version numbers and accompanying documentation. Copyright (C) 2000 Andy Piper. */ #define XEMACS_INFO_XEMACS_ORG_REGISTRY_NAME "XEmacs" #define XEMACS_INFO_XEMACS_REGISTRY_NAME "XEmacs" /* Keys */ #define XEMACS_INFO_XEMACS_ROOT_KEY "emacs_dir" #define XEMACS_INFO_XEMACS_ROOT_TYPE "install_type" #define XEMACS_INFO_XEMACS_PACKAGE_KEY "EMACSPACKAGEPATH" #define XEMACS_INFO_XEMACS_EARLY_PACKAGES_KEY "EMACSEARLYPACKAGES" #define XEMACS_INFO_XEMACS_LATE_PACKAGES_KEY "EMACSLATEPACKAGES" #define XEMACS_INFO_XEMACS_LAST_PACKAGES_KEY "EMACSLASTPACKAGES" #define XEMACS_INFO_XEMACS_VERSION_KEY "version" #define XEMACS_DEFAULT_ROOT "\\Program Files\\XEmacs" #define XEMACS_CYGWIN_DEFAULT_ROOT "\\usr\\local" #define XEMACS_SETUP_DIR \ ((char*)(install_type == IDC_INSTALL_NATIVE ? "\\setup\\" : "/lib/xemacs/setup/")) #define XEMACS_RESOURCE_DIR \ ((char*)(install_type == IDC_INSTALL_NATIVE ? "\\" : "/lib/xemacs/")) #define XEMACS_PACKAGE_DIR \ ((char*)(install_type == IDC_INSTALL_NATIVE ? "\\xemacs-packages\\" \ : "/lib/xemacs/xemacs-packages/")) #define XEMACS_NATIVE_ARCH_NAME "i586-pc-win32" #define XEMACS_CYGWIN_ARCH_NAME "i686-pc-cygwin" /* * Installation hierarchy is: * C:\Program Files\XEmacs * \xemacs-packages * \etc * \info * \lib-src * \lisp * \man * \pkginfo * \site-packages * \mule-packages * \XEmacs-21.4 * \i586-pc-win32 * \etc * \info * \lisp * Or: * /usr/local/lib * /xemacs/xemacs-packages * /xemacs/site-packages * /xemacs/mule-packages * /xemacs-21.4 * /i686-pc-cygwin * /etc * /info * /lisp * /usr/local/bin/i686-pc-cygwin */