(send_process): Use encode_coding_object instead of
[bpt/emacs.git] / doc / misc / cl.texi
index 60a1e05..fb1aace 100644 (file)
@@ -6,11 +6,11 @@
 This file documents the GNU Emacs Common Lisp emulation package.
 
 Copyright @copyright{} 1993, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
-2008  Free Software Foundation, Inc.
+2008, 2009  Free Software Foundation, Inc.
 
 @quotation
 Permission is granted to copy, distribute and/or modify this document
-under the terms of the GNU Free Documentation License, Version 1.2 or
+under the terms of the GNU Free Documentation License, Version 1.3 or
 any later version published by the Free Software Foundation; with no
 Invariant Sections, with the Front-Cover texts being ``A GNU Manual'',
 and with the Back-Cover Texts as in (a) below.  A copy of the license
@@ -44,6 +44,8 @@ developing GNU and promoting software freedom.''
 @insertcopying
 @end titlepage
 
+@contents
+
 @node Top, Overview, (dir), (dir)
 @chapter Introduction
 
@@ -53,6 +55,10 @@ Common Lisp.  All the facilities are described here in detail.  While
 this document does not assume any prior knowledge of Common Lisp, it
 does assume a basic familiarity with Emacs Lisp.
 
+@ifnottex
+@insertcopying
+@end ifnottex
+
 @menu
 * Overview::             Installation, usage, etc.
 * Program Structure::    Arglists, `eval-when', `defalias'
@@ -1732,6 +1738,11 @@ generated directly inside Emacs will not be caught since they make
 direct C-language calls to the message routines rather than going
 through the Lisp @code{message} function.
 
+@c Bug#411.
+Also note that many primitives (e.g. @code{+}) have special byte-compile
+handling.  Attempts to redefine such functions using @code{flet} will
+fail if byte-compiled.  In such cases, use @code{labels} instead.
+
 Functions defined by @code{flet} may use the full Common Lisp
 argument notation supported by @code{defun*}; also, the function
 body is enclosed in an implicit block as if by @code{defun*}.
@@ -5153,7 +5164,7 @@ Emacs Lisp:
         collect (if flag x (funcall func x))))
 
 (defun add-odd-elements (list x)
-  (map-odd-elements (lambda (a) (+ a x))) list)
+  (map-odd-elements (lambda (a) (+ a x)) list))
 @end example
 
 @noindent
@@ -5324,8 +5335,6 @@ recursion.
 
 @printindex vr
 
-@setchapternewpage odd
-@contents
 @bye
 
 @ignore