# HG changeset patch # User Glenn Morris # Date 1200027366 0 # Node ID e73d87d0fb586541e199c4a4a5c33eceb5cebd2d # Parent bbefe7ad9494f863d76f19aa824cc1202d01b258 (big5-to-flat-code, flat-code-to-big5, euc-to-flat-code, flat-code-to-euc): Declare as functions. diff -r bbefe7ad9494 -r e73d87d0fb58 lisp/language/china-util.el --- a/lisp/language/china-util.el Fri Jan 11 04:55:32 2008 +0000 +++ b/lisp/language/china-util.el Fri Jan 11 04:56:06 2008 +0000 @@ -175,6 +175,13 @@ ;; Many kudos to Himi! The used code has been adapted from his ;; mule-ucs package. +;; Silence the compiler, which otherwise warns that these functions +;; might not be defined at runtime. They are only used when compiling. +(declare-function big5-to-flat-code "china-util" (num)) +(declare-function flat-code-to-big5 "china-util" (num)) +(declare-function euc-to-flat-code "china-util" (num)) +(declare-function flat-code-to-euc "china-util" (num)) + (eval-when-compile (defun big5-to-flat-code (num) "Convert NUM in Big 5 encoding to a `flat code'.