* mel-b-ccl.el (ccl-cascading-read): Check consistency.

diff --git a/ChangeLog b/ChangeLog
index b0c52dd..3db07bd 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+1998-11-14  Tanaka Akira  <akr@jaist.ac.jp>
+
+       * mel-b-ccl.el (ccl-cascading-read): Check consistency.
+
 1998-11-13  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
 
        * eword-decode.el (eword-decode-structured-field-body): Abolish

diff --git a/mel-b-ccl.el b/mel-b-ccl.el
index fd84a78..e9e7f16 100644 (file)
--- a/mel-b-ccl.el
+++ b/mel-b-ccl.el
@@ -143,6 +143,8 @@ abcdefghijklmnopqrstuvwxyz\
 
 )
 
+(check-broken-facility ccl-cascading-read)
+
 (if-broken ccl-cascading-read
     (define-ccl-program mel-ccl-decode-b
       `(1