1 ;;; pccl-20.el --- Portable CCL utility for Emacs 20 and XEmacs-21-mule
3 ;; Copyright (C) 1998 Free Software Foundation, Inc.
4 ;; Copyright (C) 1998 Tanaka Akira
6 ;; Author: Tanaka Akira <akr@jaist.ac.jp>
7 ;; Keywords: emulation, compatibility, Mule
9 ;; This file is part of APEL (A Portable Emacs Library).
11 ;; This program is free software; you can redistribute it and/or
12 ;; modify it under the terms of the GNU General Public License as
13 ;; published by the Free Software Foundation; either version 2, or (at
14 ;; your option) any later version.
16 ;; This program is distributed in the hope that it will be useful, but
17 ;; WITHOUT ANY WARRANTY; without even the implied warranty of
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 ;; General Public License for more details.
21 ;; You should have received a copy of the GNU General Public License
22 ;; along with GNU Emacs; see the file COPYING. If not, write to the
23 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
24 ;; Boston, MA 02110-1301, USA.
30 ;; We only support 21.4 and 21.5 in the packages; all these tests return
33 (broken-facility ccl-accept-symbol-as-program
34 "Emacs does not accept symbol as CCL program."
37 (broken-facility ccl-execute-eof-block-on-encoding-null
38 "Emacs forgets executing CCL_EOF_BLOCK with encoding on empty input. (Fixed on Emacs 20.4)"
41 (broken-facility ccl-execute-eof-block-on-encoding-some
42 "Emacs forgets executing CCL_EOF_BLOCK with encoding on non-empty input. (Fixed on Emacs 20.3)"
45 (broken-facility ccl-execute-eof-block-on-decoding-null
46 "Emacs forgets executing CCL_EOF_BLOCK with decoding on empty input. (Fixed on Emacs 20.4)"
49 (broken-facility ccl-execute-eof-block-on-decoding-some
50 "Emacs forgets executing CCL_EOF_BLOCK with decoding on non-empty input. (Fixed on Emacs 20.4)"
53 (broken-facility ccl-execute-eof-block-on-encoding
54 "Emacs may forget executing CCL_EOF_BLOCK with encoding."
55 (not (or (broken-p 'ccl-execute-eof-block-on-encoding-null)
56 (broken-p 'ccl-execute-eof-block-on-encoding-some)))
59 (broken-facility ccl-execute-eof-block-on-decoding
60 "Emacs may forget executing CCL_EOF_BLOCK with decoding."
61 (not (or (broken-p 'ccl-execute-eof-block-on-decoding-null)
62 (broken-p 'ccl-execute-eof-block-on-decoding-some)))
65 (broken-facility ccl-execute-eof-block
66 "Emacs may forget executing CCL_EOF_BLOCK."
67 (not (or (broken-p 'ccl-execute-eof-block-on-encoding)
68 (broken-p 'ccl-execute-eof-block-on-decoding)))
76 (product-provide (provide 'pccl-20) (require 'apel-ver))
78 ;;; pccl-20.el ends here