(write-multibyte-character r3 r2))))
;; Surrogates, U+D800 .. U+DFFF
- ;; Fixme: process them properly.
(if (r3 < #xe000)
((r3 = r6)
(write-multibyte-character r3 r0) ; eight-bit-graphic
;;; cyril-util.el --- utilities for Cyrillic scripts
-;; Copyright (C) 1997, 2001 Free Software Foundation, Inc.
+;; Copyright (C) 1997, 2001, 2002 Free Software Foundation, Inc.
;; Keywords: mule, multilingual, Cyrillic
;;; Code:
+;; Fixme: are the next two useful?
+
;;;###autoload
(defun cyrillic-encode-koi8-r-char (char)
"Return KOI8-R external character code of CHAR if appropriate."