Mercurial > hg > xemacs-beta
view src/console-stream.h @ 5305:09fed7053634
Handle slightly more complex type specifications, #'coerce, #'typep.
2010-11-17 Aidan Kehoe <kehoea@parhasard.net>
* cl-extra.el (coerce):
In the argument list, name the first argument OBJECT, not X; the
former name was always used in the doc string and is clearer.
Handle vector type specifications which include the length of the
target sequence, error if there's a mismatch.
* cl-macs.el (cl-make-type-test): Handle type specifications
starting with the symbol 'eql.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Wed, 17 Nov 2010 14:30:03 +0000 |
parents | 141c2920ea48 |
children | 308d34e9f07d |
line wrap: on
line source
/* Define stream specific console, device, and frame object for XEmacs. Copyright (C) 1995 Board of Trustees, University of Illinois. Copyright (C) 1995 Free Software Foundation, Inc. Copyright (C) 2002 Ben Wing. This file is part of XEmacs. XEmacs 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. XEmacs 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 XEmacs; see the file COPYING. If not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /* Synched up with: Not in FSF. */ /* Written by Ben Wing. */ #ifndef INCLUDED_console_stream_h_ #define INCLUDED_console_stream_h_ #include "console.h" #ifndef NEW_GC extern const struct sized_memory_description stream_console_data_description; #endif /* not NEW_GC */ extern Lisp_Object Vterminal_console, Vterminal_frame, Vterminal_device; Lisp_Object stream_semi_canonicalize_console_connection (Lisp_Object, Error_Behavior); Lisp_Object stream_canonicalize_console_connection (Lisp_Object, Error_Behavior); Lisp_Object stream_semi_canonicalize_device_connection (Lisp_Object, Error_Behavior); Lisp_Object stream_canonicalize_device_connection (Lisp_Object, Error_Behavior); #endif /* INCLUDED_console_stream_h_ */