Mercurial > emacs
view msdos/sed6.inp @ 111704:31c8556ccad8
* lisp/emacs-lisp/pcase.el: Improve pcase-let. Use "pcase--" prefix.
(pcase--dontcare-upats): New var.
(pcase-let, pcase-let*): Generate better code.
Accept the same bodies as `let'.
(pcase-dolist): New macro.
(pcase--trivial-upat-p): New helper function.
(pcase--expand): Strip leading "(let nil" if any.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Wed, 24 Nov 2010 11:39:51 -0500 |
parents | 98fd8b0e411d |
children | 417b1e4d63cd |
line wrap: on
line source
# -sed6.inp------------------------------------------------------------------ # Configuration script for doc/emacs/Makefile, doc/lispref/Makefile, # doc/lispintro/Makefile, and doc/misc/Makefile under DJGPP v2.x # --------------------------------------------------------------------------- # # Copyright (C) 1997, 2000, 2001, 2002, 2003, 2004, # 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. # # This file is part of GNU Emacs. # # This file is free software; as a special exception, the author gives # unlimited permission to copy and/or distribute it, with or without # modifications, as long as this notice is preserved. # # This program 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. # # ---------------------------------------------------------------------- /^srcdir *=/s/@[^@\n]*@/./ /^VPATH *=/s/@[^@\n]*@/./ /^ENVADD/c\ ENVADD =\ export TEXINPUTS := $(srcdir)";"$(TEXINPUTS)\ export MAKEINFO := $(MAKEINFO) -I$(srcdir) /^texinputdir/c\ texinputdir =\ export texinputdir := $(srcdir)";"$(TEXINPUTS) /^SHELL *=/s/^/# / /^elisp.dvi:/,/^$/ { /^ *if \[ *\a${permuted_index}/,/^ *fi *$/c\ command.com /c 'if not a${permuted_index}==a sh ./permute-index' \ command.com /c 'if not a${permuted_index}==a mv permuted.fns elisp.fns' \ command.com /c 'if not a${permuted_index}==a texindex elisp.tp' \ command.com /c 'if a${permuted_index}==a texindex elisp.??' } /^index.texi:/,/^$/ { /^ *if \[ *\a${permuted_index}/,/^ *fi *$/c\ command.com /c 'if not a${permuted_index}==a cp -p ./index.perm index.texi' \ command.com /c 'if a${permuted_index}==a cp -p ./index.unperm index.texi' } /^maintainer-clean:/,/^$/ { s/^ for file in $(INFO_TARGETS)\; do rm -f.*$/ rm -f $(INFO_TARGETS)/ } /^mkinfodir *=/s| @.*$|@command.com /c if not exist ..\\..\\info\\emacs mkdir ..\\..\\info| # arch-tag: defe1001-f35a-47f7-9635-3f5d33ee5e97