# HG changeset patch
# User John Paul Wallington <jpw@pobox.com>
# Date 1212586912 0
# Node ID 010f8fbe935d2a30b4fb90b68ca29b711b3c32ff
# Parent  73018c6032bec6cc2b25d8561d71f9feb21574b9
(define-ccl-program): Add `doc-string' declaration.

diff -r 73018c6032be -r 010f8fbe935d lisp/international/ccl.el
--- a/lisp/international/ccl.el	Wed Jun 04 11:22:53 2008 +0000
+++ b/lisp/international/ccl.el	Wed Jun 04 13:41:52 2008 +0000
@@ -1304,6 +1304,7 @@
 
 ;;;###autoload
 (defmacro define-ccl-program (name ccl-program &optional doc)
+  (declare (doc-string 3))
   "Set NAME the compiled code of CCL-PROGRAM.
 
 CCL-PROGRAM has this form: