annotate lisp/term/cygwin.el @ 4949:018e13fdeaeb

compile-related functions added, for use in Unicode-internal ws -------------------- ChangeLog entries follow: -------------------- lisp/ChangeLog addition: 2010-01-17 Ben Wing <ben@xemacs.org> * bytecomp-runtime.el: * bytecomp-runtime.el (error-unless-tests-match): New. * bytecomp-runtime.el (byte-compile-file-being-compiled): New. * bytecomp-runtime.el (compiled-if): New. * bytecomp-runtime.el (compiled-when): New. Add functions for dealing with conditional compilation of different code depending on the presence or absence of features. Necessary for some Mule code where code is run during compilation (macros or eval-when-compile) but, depending on how the code is written, the code itself will crash either with or without Unicode-internal. compiled-if and compiled-when are the basic functions for conditional compilation. They automatically trigger an error message upon file loading if, at that time, the test expression that selected which code to compile does not have the same value as at compile time.
author Ben Wing <ben@xemacs.org>
date Sun, 17 Jan 2010 04:52:48 -0600
parents 11502791fc1c
children 308d34e9f07d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
622
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
1 ;;; cygwin.el --- define function key sequences for the Cygwin console
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
2
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
3 ;; Copyright (C) 2001 Ben Wing.
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
4
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
5 ;; Author: Ben Wing
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
6 ;; Keywords: terminals
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
7
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
8 ;; This file is part of XEmacs.
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
9
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
10 ;; XEmacs is free software; you can redistribute it and/or modify it
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
11 ;; under the terms of the GNU General Public License as published by
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
12 ;; the Free Software Foundation; either version 2, or (at your option)
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
13 ;; any later version.
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
14
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
15 ;; XEmacs is distributed in the hope that it will be useful, but
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
16 ;; WITHOUT ANY WARRANTY; without even the implied warranty of
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
18 ;; General Public License for more details.
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
19
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
20 ;; You should have received a copy of the GNU General Public License
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
21 ;; along with XEmacs; see the file COPYING. If not, write to the Free
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
22 ;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
23 ;; 02111-1307, USA.
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
24
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
25 ;;; Synched up with: Not in FSF.
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
26
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
27 ;;; Commentary:
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
28
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
29 ;;; Code:
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
30
11502791fc1c [xemacs-hg @ 2001-06-22 01:49:57 by ben]
ben
parents:
diff changeset
31 (load "term/linux" nil t)